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INTRODUCTION 


This  SPARCS-2  (Simulation  Program  for  Assessing  the  Reliabilities  of 
Complex  Systems,  Version  2)  Users  Manual  provides  the  information  and  instruc- 
tions for  using  the  SPARCS-2  computer  program.  A glossary  is  included  con- 
taining the  general  terminology  and  a description  of  the  input  terms.  The 
manual  also  includes  a general  description  of  the  program  system  capabilities 
and  its  operation  as  well  as  a listing  of  the  specific  functions  performed 
by  the  program.  In  addition,  sections  containing  usage  instructions  and 
control  or  operating  instructions  are  also  included.  These  instructions 
cover  areas  such  as:  data  input  format,  formalized  deck  structure,  and 
the  procedure  for  putting  SPARCS  on  a load  module  and  for  executing  the 
stored  program.  Two  example  cases  are  also  included  which  demonstrate 
setting  up  a problem,  the  input  data  deck,  and  the  resulting  output  of  the 
analysis . 

SPARCS-2  is  the  result  of  a continuation  of  the  research  effort  at 
Oklahoma  State  University  for  exact  estimation  and  assessment  of  the  re- 
liabilities of  complex  systems,  performed  largely  under  the  sponsorship  of 
the  Air  Force  Flight  Dynamics  Laboratory.  The  original  version  of  SPARCS 
was  programmed  in  1975  by  J.  W.  Cooley,  and  it  is  documented  in  both 
References  [4]  and  [5].  Both  SPARCS  and  SPARCS-2,  being  Monte  Carlo  pro- 
grams, incorporate  an  estimation  program  MAPS  (Method  for  the  Analysis  of 
the  Probabilities  of  Systems)  developed  by  J.  L.  Burris  [1].  MAPS  in  turn 
is  based  on  earlier  FORTRAN  programs  developed  at  Rockwell  International 
for  NASA,  documented  in  [2]  and  [3] . 
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COMPUTER  PROGRAM  SYSTEM  CAPABILITIES 


Purpose 

SPARCS-2  (Simulation  Program  for  Assessing  the  Reliabilities  of  Complex 
Systems,  Version  2)  is  a PL/1  computer  program  for  assessing  (establishing 
interval  estimates  for)  the  reliability  and  the  MTBF  of  a large  and  complex 
system  of  any  modular  configuration.  The  system  can  consist  of  a complex 
logical  assembly  of  independently  failing  attribute  (binomial-Bemoulli) 
and  time-to-f ailure  (Poisson-exponential)  components,  without  regard  to 
their  placement.  Alternatively,  it  can  be  a configuration  of  independently 
failing  modules,  where  each  module  has  either  or  both  attribute  and  time- 
to-failure  components. 

SPARCS-2  also  has  an  improved  "super  modularity"  feature.  Modules  with 
minimal-cut  unreliability  calculations  can  be  mixed  with  those  having 
minimal-path  reliability  calculations.  All  output  has  been  standardized  to 
system  reliability  or  "probability  of  success",  regardless  of  the  form  in 
which  the  input  data  is  presented,  and  whatever  the  configuration  of  modules 
or  elements  within  modules. 

General  Description 

The  raw  data  for  the  reliability  assessments  are  the  component  failure 
history  data  and  the  system  configuration.  The  historical  data  are  "suc- 
cesses and  failures"  for  binomial-Bernoulli  components  and  "failures  and 
testing  time  (normalized  to  'mission  equivalent  units')"  for  time-to-f ailure 
components.  The  configuration  data  consist  of  a list  or  lists  of  minimal 
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paths  ("minimal  path  sets"  or  "tie  sets")  , or  else  a list  of  minimal  cuts 
("minimal  cut  sets"),  for  the  system  as  a list  of  modules,  and  for  each 
module  as  a list  of  components.  If  the  MTBF  assessment  option  is  selected, 
the  system  "mission  time"  is  also  needed. 

The  underlying  mathematical  model  is  an  amalgamation  of  Boolean  logic, 
probability,  and  Bayesian  and  Monte  Carlo  techniques.  The  system  reliability, 
a numerical-valued  function  of  the  component  reliabilities,  is  derived  by 
the  method  of  inclusion-exclusion,  also  known  as  Poincard’s  theorem,  from 
the  "minimal  paths"  or  the  "minimal  cuts".  The  failure-history  data  are 
"sufficient  statistics"  for  the  parameters  of  Bayesian  conjugate  prior  dis- 
tributions (c.p.d.'s)  on  the  component  reliabilities,  "beta"  for  attributes 
and  "negative-log  gamma"  for  time-to-f ailure . 

Functions  Performed 

If  the  system  minimal  success  states  or  "minimal  paths"  are  input,  a 
polynomial  is  generated  which  gives  the  system  reliability  as  a function  of 
the  component  reliabilities.  By  substituting  component  reliabilities  into 
this  function,  the  system  reliability  is  obtained.  Dually,  if  the  system 
minimal  failure  states  or  "minimal  cuts"  are  input,  a polynomial  is  generated 
which  gives  the  system  unreliability  as  a function  of  the  component  unre- 
liabilities. 

SPARCS  assesses  by  Monte  Carlo.  Through  this  process,  the  system  re- 
liability estimate  for  each  Monte  Carlo  trial  is  obtained  by  substituting 
component  probabilities  into  the  function.  At  each  trial,  for  each  com- 
ponent, a value  of  the  reliability  is  generated  from  the  c.p.d.  and 


3 


substituted  into  the  system  function,  to  obtain  a value  of  the  system 
reliability  for  that  trial.  The  resulting  "empirical"  distribution  of 
system  reliabilities,  obtained  over  a series  of  trials,  provides  the  basis 
for  an  assessment.  Percentage  points  on  that  distribution  are  interpreted 
as  system  reliability  confidence  limits.  The  corresponding  MTBF  confidence 
limits  are  calculated,  based  on  the  simple  relationship  between  the  re- 
liability and  the  MTBF. 


FUNCTION  DESCRIPTION 

There  are  15  specific  functions  performed  by  the  computer  program 
and  they  are  a part  of  the  internal  documentation  included  in  the  first 
four  and  one-half  pages  of  computer  output.  The  functions  and  procedure 
names  included  in  the  program  are  as  follows  : 


ALGAMA 
C A BT  A 
COMPUTE 

CAT AGEN 

EOGEN 
EQ  PUT 
GAUSF. 

HDL  INE 
HI S INF 

IN  PUT  1 » 2»  3 » 4 
ME ANRE  L 

RANF 


RGAMA 
SORT 
ST  AT 


COMPUTES  LOG  OF  GAMMA  FUNCTION. 
GENERATES  BETA  DEVIATES. 

CALCULATES  MODULE  OR  SYSTEM 
RELIABILITY  OR  UNRELIABILITY. 

COMPUTES  COMPONENT  PRIOR 
DISTRIBUTION  MEAN  RELIABILITIES. 
GENERATES  PROBABILITY  EQUATIONS. 
PRINTS  OUT  PROBABILITY  EQUATIONS. 
GENERATES  10,11  NORMAL  DEVIATES. 
PRINTS  OUT  SYSTEM  IDENTIFICATION. 
PRINTS  OUT  FAILURE-HISTORY  DATA  FOR 
COMPONENTS  AND  PRIOR  MEANS. 

READS  INPUT  DATA. 

COMPUTES  MEAN  COMPONENT  RELIABILITIES 
FROM  FAILURE-HISTORY  DATA. 

GENERATES  UNIFORM  PSEUDORANDOM 
DEVIATES  . 

GENERATES  GAMMA  DEVIATES. 

PERFORMS  'SHELL*  SORT. 

COMPUTES  AND  PRINTS  R AND  MTBF 
AVERAGES,  VARIANCES  L PERCENTILES. 
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USAGE  INSTRUCTIONS 


Computer  Input  Terms 


ATYPE 

MINPTH 

NARG 

NCOM 

NMOD 

NPATH 

SIMNUM 

SYSID 

TIME 

UNIT 


- FLAG  INDICATING  RELIABILITY  OR 
UNRELIABILITY  COMPUTATION 

- BINARY  VECTORS  FOR  MINIMAL  PATH 

- SEED  FOR  RANDOM  NUMBER  GENERATION 

- NUMBER  OF  COMPONENTS  IN  SYSTEM 

- NUMBER  OF  MODULES  IN  SYSTEM 

- NUMBER  OF  MINIMAL  STATES  IN  SYSTEM 

- NUMBER  OF  SIMULATIONS  TO  BE  PERFORMED 

- SYSTEM  IDENTIFICATION 

- MISSION  T IME 

- TIME  UNIT 


Capacity 


SPARCS-2  can  process  a system  consisting  of  up  to  128  modules  or 
components  in  any  configuration  with  up  to  256  minimal  states.  Likewise, 
a module  within  the  system  can  have  128  components  and  256  minimal  states. 
A probability  equation  can  have  up  to  3500  terms. 


Making  Alterations  to  SPARCS-2  Program 

Minor  alterations  can  be  made  to  SPARCS  without  great  difficulty.  For 
example,  increasing  the  capacity  for  terms  in  the  probability  equation 
under  a dynamic  storage  allocation  can  be  done  by  augmenting  the  numerical 
argument  for  TERMS  in  the  statement 


DCL  (MINPTH  (128),  TERMS  (3500))  BIT  (128)  VAR. 


If  possible,  alterations,  when  they  are  necessary,  should  be  confined  to 
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minor  changes  like  increases  in  capacity  or  input-output  modifications. 
Mathematical  procedures  such  as  EQGEN  (probability  equation  generator) , 
CABTA  (beta  random  deviate  generator) , and  RGAMA  (gamma  random  deviate  gen- 
erator) can  be  changed  only  if  there  is  sufficient  background  mathematical 
analysis.  For  example,  the  random  deviate  generators  are  checked  out  on 
32-bit  IBM-370  machines;  extensive  reprogramming  would  have  to  be  done  for 
other  word  sizes,  or  for  the  computer  products  of  other  manufacturers. 


Substitution  of  Beta  Components  for  Gamma  Components 


As  this  report  went  to  press,  it  became  apparent  that  certain  field 
changes  have  to  be  made  to  the  gamma  generator  incorporated  into  SPARCS-2. 

Until  these  changes  are  made,  it  will  be  necessary  for  users  to  substitute  beta 
for  gamma.  This  means  treat  all  time-to-f ailure  gamma  components  as  if  they 
were  zero-one  attribute  beta  components.  This  is  easily  done  as  explained  below. 

A gamma  component  has  two  historical  data  inputs:  t,  number  of  missions, 
and  r,  number  of  failures.  A beta  component  also  has  two  pieces  of  input  data: 
s,  successes,  and  r,  failures.  Both  s and  r are  integers,  whereas  the  gamma  t 
is  not  necessarily  an  integer.  All  that  is  needed  to  make  the  substitution  is 
an  integer  value  of  s which  is  a function  of  t and  r.  The  following  formula 
makes  that  conversion.  Let 


z 


t + 1 
t + 2 


r + 


1 


denote  the  mean  of  the  negative-log  gamma  conjugate  prior  distribution  on  the 
time-to-failure  component  reliability.  Then 


(b  + 2)z  - 1. 

1 _ r,  ’ 


(1) 


that  is,  s is  the  integer  closest  to  the  right-hand  side  of  (1).  This  conversion 
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was  derived  by  equating  the  mean  of  the  negative— log  gamma  distribution 
with  the  mean  of  the  beta  distribution. 


Preparation  of  Inputs 


The  internal  documentation  of  the  program  describes  the  preparation  of  the 
input  data.  The  input  data  format  is  shown  both  for  a system  without  modules 
and  for  a system  with  modules. 


SYSTEM  WITHOUT  MODULES 


DATA  NUMBER  COLUMN  DESCRIPTIONS 

SET  OF  CARDS  POSITION 


FIRST 


80  ALPHANUMERIC  SYSTEM  IDENTIFICATION. 


SECOND 


1 - 4 NUMBER  OF  MONTE  CARLO  TRIALS. 

6-14  SEED  VALUE  FOR  RANDOM  NUMBER 

GENFRATI ON  {MUST  BE  A NON-ZERO 
POSITIVE  INTEGER,  <=  1.0  E+09).  FOR 
EXAMPLE,  4527851  . 

16  - 20  SYSTEM  MISSION  TIME  (OPTIONAL). 


THIRD 


1 - 3 (NUMERIC  ZERO  DENOTES  NO  MODULES). 

5 - 7 NUMBER  OF  COMPONENTS  IN  SYSTEM! N<129) 

9-13  NUMBER  OF  SYSTEM  MINIMAL  STATES 

(M<257) . 

14  R FOR  SYSTEM  RELIABILITY,  U FOR 

SYSTEM  UNRELIABILITY. 

15  - 19  MISSION  TIME  UNITS,  ALPHABETIC 

(OPTIONAL) . 


FOURTH  N FREE  FORMAT  ITEMlS  • O' B FOR  GAMMA  (TIME-TO- 

FAILURE)  OR  'l'B  FOR  BETA 
( SUCCESS-FAILURE) . 

ITEM2:  NUMBER  OF  MISSIONS  (GAMMA)  OR 
SUCCESSES  (BETA). 

ITEM3:  NUMBER  OF  FAILURES. 

FIFTH  FREE  FORMAT  M MINIMAL  STATES  AS  A STRING  DF 

N-VECTORS  SUCH  AS  '00110'B. 
COMPONENTS  IN  THE  MINIMAL  STATE  ARE 
DENOTED  BY  1,  COMPONENTS  NOT  IN 
MINIMAL  STATE  BY  0. 


EXAMPLE 


COLUMN  0 000000001  III U 11  122  22  22  222333333333 
PCS  I T ION  12345678901234  56789012  34  567  89012  3456789 


CARD  6 
5 
4 


' 10 ' B *01*0 
' 1' B 95 . 3. 

' O' B 99.  1. 


3 02  2RH0UR 

2 100  4527351  100 

1 TWO  COMPONENT  - TWO  MINIMAL  PATH  SYSTEM 
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SYSTEM  WITH  MODULES 


DATA  NUMBER  COLUMN  DESCRIPTION 

SET  OF  CARDS  POSITION 

FIRST  I 1-80  ALPHANUMERIC  SYSTEM  IDENTIFICATION. 

SECOND  1 1-4  NUMBER  OF  MONTE  CARLO  TRIALS. 

6-14  SEED  VALUE  FOR  RANDOM  NUMBER 

GENERATION  (MUST  BE  A NON-ZERO 
POSITIVE  INTEGER,  <=  1.0  E+09).  FOR 
EXAMPLE,  2365142  . 

16  - 20  SYSTEM  MISSION  TIME  (OPTIONAL). 


THIRD  1 1-3  NUMBER  OF  MODULES  IN  SYSTEM  (K<129). 

5 - 7 NUMBER  OF  COMPONENTS  IN  SYSTEM. 

9-13  NUMBER  OF  MINIMAL  STATES  IN  SYSTEM 

( J<257 ) . 

14  R FOR  SYSTEM  RELIABILITY,  U FOR 

SYSTEM  UNRELIABILITY. 

15  - 19  MISSION  TIME  UNITS,  ALPHABETIC 

(OPT IONAL)  . 

FOURTH  FREE  FORMAT  J SYSTEM  MINIMAL  STATES  AS  A STRING 

OF  BINARY  K-VECTORS,  SUCH  AS  '010'B. 
MODULES  IN  MINIMAL  STATE  ARE  DENOTED 
BY  1,  MODULES  NOT  IN  MINIMAL  STATE 
BY  0. 

R FOR  MODULE  RELIABILITY,  U FOR 
MODULE  J NR  EL  I ABIL ITY . 

MODULE  IDENTIFICATION,  ALPHANUMERIC. 
NUMBER  OF  COMPONENTS  IN  MODULE ( NC129) 
NUMBER  OF  MINIMAL  STATES  IN  MODULE 
( M<  2 5 7 ) . 

SIXTH  M FREE  FORMAT  ITEM1:  'O'B  FOR  GAMMA ( T I ME-T 0- 

FAI LURE)  OR  ' l'B  FOR  BETA 
(SUCCESS  - FA  ILURE  ). 

I TEM2  : NUMBER  OF  M I S S I ONS (G AMMA ) CP 
SUCCESSES! BETA) . 

ITEM3:  NUMBER  OF  FAILURES. 

SEVENTH  FREE  FORMAT  M MODULE  MINIMAL  STATES  AS  A STRING 

OF  BINARY  N-VECTORS  SUCH  AS 
•OlllO'B.  COMP CNEN T S IN  MINIMAL  STATE 
ARE  DENOTED  BY  1,  COMPONENTS  NOT  IN 
MINIMAL  STATE  BY  0. 

* THE  FIFTH,  SIXTH,  AND  SEVENTH  DATA  SETS  ARE  REPEATED  FOR  EACH 
MODULE. 


FIFTH  1 

2-7 
12  - 14 
16  - 18 


8 


EXAMPLE 


C CLUMN  0 0000000011111  1 111222222  222  333  33  33  33 
POSIT  ION  1234367890 12345678901 234 56 7 8 90 123456789 


CARO  12 
1 1 
1 C 
9 
8 
7 
6 
5 
4 
3 
2 
1 


•10'B  '01*8 

• 1*8  90.  1. 

• O'  8 92.  7. 

RB  2 2 

•Ol'B  • 10  'B 

' O'  B 95.  5. 

•l'B  99.  1. 

U A 2 2 

• O' B • 10 ' B 

2 2 2RCYCLE 

20  2365142  50 

TWO  MODULES  AND  TWO  COMPCNENTS  SYSTEM  ANALYSIS 


Results  of  Operation 

Two  cases  of  a sample  problem  will  be  used  to  demonstrate  the  ra- 
tionale behind  the  problem  design.  The  cards  from  the  data  deck  are 
listed  as  well  as  the  output  format  and  a discussion  of  the  output  is 
included. 

Sample  Problem 

The  sample  problem  in  this  section  is  taken  from  a TRW  internal 
publication  [<5]  on  software  reliability.  We  show  how  it  was  run  in 
different  ways  to  illustrate  some  of  the  applications  of  the  "super 
modularity"  feature  of  SP ARCS-2.  The  logical  configuration  can  be  either 
the  system  minimal  paths  (system  reliability)  or  minimal  cuts  (system 
unreliability)  with  either  the  module  minimal  paths  (module  reliability) 
or  minimal  cuts  (module  unreliability).  Since  the  output,  a schedule  of 
percentage  points  on  an  "empirical"  distribution  of  the  reliability,  is 
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standardized  to  system  reliability,  the  example  also  demonstrates  the 
reproducibility  of  results. 

The  problem  is  illustrated  by  the  flow  diagram  in  Figure  1 and  the 
corresponding  network  logic  diagram  in  Figure  2,  both  of  which  are  taken 
from  [6].  It  is  identified  in  the  reference  as  a "Triangle  Type  Deter- 
mination Program  (TTDP)"  for  structural-exercise  test  effectiveness 
measurement  tools  belonging  to  TRW's  Product  Assurance  Confidence  Evaluator 
(PACE)  system. 


Figure  1.  Flow  Diagram  of  TTDP 
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Figure  2.  Network  of  Node-to-Node  Branching 
Potential 

The  system  was  subdivided  into  two  modules,  A with  components 
1,  7,  and  B with  components  8,  . ..,  20.  Since  the  SPARCS-2  program  assigns 

sequence  numbers  to  the  components  within  each  module  by  default,  8,  ...,  20 
were  renumbered  1,  ...,  13,  respectively,  so  that  there  is  a constant 
difference  of  7 between  the  module-B  component  numbers  in  the  computer 
output  and  in  the  description  in  the  sequence.  For  example,  8 in  the  de- 
scription is  1 in  the  computer  output,  9 is  2,  etc. 

Module  A represents  the  top  half  of  Figure  2 and  B the  bottom  half. 

Since  both  are  needed,  the  system  may  be  viewed  either  as  two  "successful" 
elements  in  series  for  reliability  calculations,  or  else  two  failed  elements 
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in  parallel  for  unreliability  calculations.  Thus  there  is  one  minimal 
path 


A,  B 


and  there  are  two  minimal  cuts 


A 

B. 


Since  all  four  components  1,  3,  5,  and  7 are  needed  for  module  A to 
be  operative,  it  has  one  minimal  path 


1,  3,  5,  7 


and  four  minimal  cuts 


1 

3 

5 

7. 


Components  2,  4,  and  6 in  module  A are  not  essential,  and  do  not  affect 
the  reliability  calculations;  module  A will  work  even  if  all  of  them  are 
inoperative,  as  long  as  1,  3,  5,  and  7 are  all  working  properly. 

Module  B has  nine  minimal  paths  ("minimal  path  sets"  or  "tie  sets") 


13, 

16, 

18, 

20 

12, 

13, 

14 

13, 

14, 

15 

12, 

13, 

16, 

17 

13, 

15, 

16, 

17 

12, 

13, 

16, 

18 

13, 

15, 

16, 

18 

8,  9,  10,  11 
8,  12 
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It  is  shown  below  that  the  module-B  reliability  equation  based  on  these 
minimal  paths  is  91  terms  long  and  requires  a full  page  of  computer  output. 


By  inverting  and  minimalizing  the  minimal  paths,  we  obtain  the  26 
minimal  cuts  ("minimal  cut  sets") . 


8, 

13 

8, 

14, 

16 

9, 

12, 

13 

10. 

, 12; 

, 13 

11 

, 12; 

, 13 

8, 

14, 

17, 

18 

8, 

12, 

15, 

16 

8, 

12, 

15, 

18 

8, 

12, 

15, 

20 

9, 

12, 

15, 

18 

9, 

12, 

15, 

20 

9, 

12, 

14, 

16 

10, 

12, 

14, 

16 

10, 

12, 

15, 

16 

10, 

12, 

15, 

18 

10, 

12, 

15, 

20 

11, 

12, 

14, 

16 

11, 

12, 

15, 

16 

11, 

12, 

15, 

18 

11, 

12, 

15, 

20 

8, 

14, 

17, 

19, 

20 

9, 

12, 

14, 

17, 

18 

9, 

12, 

14, 

17, 

20 

10, 

12, 

14, 

17, 

18 

9, 

12, 

14, 

17, 

20 

11, 

12, 

14, 

17, 

18 

The  module-B-  unreliability  equation  based  on  these  26  minimal  cuts  has 
421  terms  and  requires  four  and  one-half  pages  of  computer  output. 

There  are  many  different  optional  ways  of  inputting  these  data,  based 
on  either  the  paths  (reliability)  or  the  cuts  (unreliability).  The  TRW- 
TTDP  problem  was  run  with  eight  different  cases  with  the  same  historical 
input  data  for  all  components,  and  20  Monte  Carlo  trials  for  each  case. 
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1.  System  reliability  - module  A reliability  - module  B 
reliability. 

2.  System  reliability  - module  A unreliability  - module 
B reliability. 

3.  System  reliability  - module  A unreliability  - module 
B unreliability. 

4.  System  unreliability  - module  A unreliability  - module 
B reliability. 

5.  System  reliability  - module  A unreliability  - module 
B reliability. 

6.  System  reliability  - module  A unreliability  - module 
B unreliability. 

7.  System  unreliability  - module  A reliability  - module 
B reliability. 

8.  System  unreliability  - module  A reliability  - module 
B unreliability. 


We  discuss  Cases  1 and  6 to  illustrate  the  input  and  the  output  formats. 

The  results  also  show  surprising  consistency,  demonstrating  that  an  assess- 
ment with  SP ARCS-2  can  be  accomplished  with  relatively  few  Monte  Carlo  trials. 

Case  1 is  "all  reliability",  reliability  for  the  system,  and  for 
module  A and  module  B.  The  cards  of  the  input  data  deck  are  listed  below. 
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80/80 


000  0000001 1 11 1 Hi  112  22  2 2222223  3333  33 
12345678901 2345678901234567890123456 

CARD 

0001  SOFTWARE  RELIABILITY  COMPUTATION 

0002  20  15783  100 


0003 

2 2 

1 RHOUR 

0004 

• 11  • B 

0005 

RA 

7 

1 

0006 

•O'B 

96.5 

2. 

0007 

• 1*  B 

99. 

1 . 

0008 

• 1*  B 

99. 

1 . 

0009 

' 1*  B 

99. 

1. 

0010 

*0*  B 

96.5 

2 . 

001  1 

* 1 ' B 

99. 

1. 

0012 

• 1 ' B 

99. 

1. 

0013 

* 10  10101  ' B 

0014 

RB 

13 

9 

0015 

•O'B 

96.5 

2. 

001  6 

•1'  B 

99. 

1 . 

0017 

•O'B 

96.5 

2. 

0018 

• 1'  B 

99  . 

1. 

0019 

• O'  B 

96.5 

2. 

0020 

• i'B 

99. 

1. 

0021 

•O'B 

96.5 

2. 

0022 

•1'  8 

99. 

1. 

0023 

•O'B 

96.  5 

2. 

0024 

•l'B 

99  . 

1. 

002  5 

' O'  B 

96.5 

2. 

0026 

•l'B 

99. 

1. 

0027 

•O’B 

96.5 

2. 

0028  • 00  COO  1 00 1 0 10 1 ' B 

0029  '0000111000000'B 

0030  '0000011100000*8 

0031  ' 00  C01 1 001  1 000' B 

0032  1 00 000 10111000* B 

0033  '0000110010  110 ' B 

0034  *0000010110  110*  B 

0035  'll 11000000000'B 

0036  ' 1000100000000* B 
003  7 $ENDLI  ST 
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The  output  is  listed  below.  Following  the  system  ID  data,  we  have 
the  minimal  state  or  states,  either  paths  or  else  cuts,  the  system  proba- 
bility function,  either  a reliability  or  an  unreliability  equation,  the 
module-A  minimal  states,  probability  equation  and  component  historical 
data,  and  the  component-B  minimal  states,  equation  and  historical  data. 
Then  follow  various  sets  of  statistical  data  relating  to  the  output  and 
finally  the  empirical  distribution  displaying  the  percentage  points  for 
assessment.  The  output  format  is  practically  the  same  as  that  in  [5] 
for  the  original  version  of  SPARCS. 


♦ SPARCS* 

SIMULATION  PROGRAM  FOP  THE  ANALYSIS  OF  THE  RELIABILITY  OF  COMPLEX  SYSTEMS 


SYSTEM  IDENTIFICATION 
NUMBER  OF  SIMUIATICNS 
NUMBER  OF  MODULES 
NUMBER  OF  COMPONENTS 
NUMBER  OF  MINIMAL  PATHS 
TYPE  OF  ANALYSIS 


SOFTWARE  RELIABILITY  COMPUTATION  -JR  BROWN  AND  LIPOW 
20 
2 
2 
1 

RELIABILITY 


SPARCS  ::  EQUATION  GENERATION  ROUTINE 
THE  1 MINIMAL  PATH  FOR  SYSTEM 
<A.8> 

NUMBER  OF  TERMS  IN  EQUATION:  L 

R - R R 
SYS  A B 

THE  l MINIMAL  PATH  FCR  MODULE  A 
<l.3.5.7> 

NUMBER  OF  TERMS  IN  EQUATION:  1 


R « R R R R 
A 13  5 7 
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HISTORICAL 

INFORMATION  FOR  EACH  COMPONENT  IN  MODULE  A 

COMPONENT 

TYPE 

SUCCESS  (BETA) 

FAILURES 

PRIOR  DISTRIBUTION 

EQUIVALENT  MI S SI GNS< GA MMA » 

MEAN 

1 

T 1ME-T0-FA  ILUREI GAMMA) 

96.50 

2.00 

0.96985 

2 

ATTRI BUTE t BETA) 

99.00 

1.00 

0.98039 

3 

ATTR I BUTE ( BETA) 

99.00 

1.00 

0.98039 

4 

ATTRI BUTE! BETA) 

99.00 

1.00 

0.98039 

5 

TIME-  TO-FAtLl*ct  GAMMA) 

96.50 

2.00 

0.96985 

6 

ATTR I BUT  E t BET  A ) 

99.00 

1.00 

0.98039 

7 

ATTRIBUTE (BETA) 

99.00 

1.00 

0.98039 

THE  9 MINIMAL  PATHS  FOR  MODULE  8 


<6*9» 1 1 *13> 
<5,6,7> 

<6 • 8 > 

<5,6,9. 10> 
<6,8.9.  IO> 
<5.6,9,11, 12> 
<6 , 8 ,9  * 1 1 • 12> 
<1.2,3, 4> 

<1,  5 > 


NUMBER  OF  TERMS  IK  EQUATION:  91 


R -RRR  R ♦ RRR  -RRRRR  R ♦ R R R -RRRRR  R -RRRR  ♦ R R R R R R R ♦ RRRR  - R * 

B 69  l i 13  567  5679  11  13  678  6789  11  13  5678  56739  11  13  569  10  5 

ft  R R R R -RRRRR  RRRRRR  R R ♦ RRRR  -RRRR  R R ♦ RRRRRR  -RRRRRR  R R 
6 9 10  11  13  5 6 7 9 10  5 6 7 9 10  11  13  6 8 9 10  6 8 9 ID  11  13  5 6 7 8 9 10  5 6 7 8 9 10  11  13 

-RRRRR  ♦ RRRRR  R R -RRRRR  ♦RRRRR  R R ♦RRRR  R -RRRR  R R -RRRRR  * 

6 7 8 9 10  6 7 8 9 10  11  13  5 6 8 9 10  5 6 8 9 10  11  13  5 6 9 11  12  5 6 9 11  12  13  5 6 7 9 11 

R ♦RRRRR  RR  -RRRRRR  ♦RRRRRR  R ♦ RRRRRRR  -RRRRRR  RR  ♦ RRR* 

U 5 6 7 9 11  12  13  5 6 9 10  11  12  5 6 9 10  11  12  13  5 6 7 9 10  11  12  5 6 7 9 10  11  12  13  689 

ft  R -RRRR  R R ♦RRRRRR  R -RRRRRR  ft  R -RRRRR  R ♦RRRRR  R R ♦ R R R R * 

11  12  6 8 9 11  12  13  5 6 7 8 9 11  12  5 6 7 8 9 11  12  13  6 7 8 9 11  12  6 7 8 9 11  12  13  5689 

R R R -RRRRR  R R R -RRRRRR  R R ♦RRRRRR  ft  R R -RRRR  R R ♦RRRR  R R * 

10  11  12  5 6 8 9 10  11  12  13  5 6 7 3 9 10  11  12  5 6 7 8 9 10  11  12  13  6 8 9 10  11  12  6 8 9 10  11  12 

R ♦RRRRR  R R -RRRRR  R R R -RRRRR  R ♦RRRRR  R R ♦RRRR  - RRRRRRR  R 

13  6 7 8 9 10  11  12  6 7 3 9 10  11  12  13  5689  U 12  5 6 8 9 11  12  13  1234  1 2 3 4 6 9 11  13 

-RRRRRRft  ♦RRRRRRRRR  R ♦RRRRRRRR  - RRRR  RRRRRR  R -RRRRRRR  R ♦ R * 
1234678  12346789  11  13  12345678  123456789  11  13  1234689  10  1 

RRRRRRR  R R -RRRRRRRRRR  ♦RRRRRRRRRR  R R ♦RRRRRRRRR  -RRRRRRR* 
23468910  11  13  123456789  10  123456789  10  LI  13  12346789  10  1234678 

RR  R R ♦RRRRRRRRR  -RRRRRRRRR  R R -RRRRRRRR  R ♦RRRRRRRR  R R -R* 
9 10  11  13  12345689  10  12345689  10  11  13  1234689  11  12  1234689  11  12  13  1 

RRRRRRRRR  R ♦RRRRRRRRRR  R R ♦RRRRRRRRR  R -RRRRRRRRR  R R -RRR* 

23456789  11  12  123456789  11  12  13  12346789  11  12  1 2 3 4 6 7 8 9 Li  12  13  123 

RRRRRR  R R ♦RRRRRRRRR  R R R ♦RRRRRRRRRR  R R -RRRRRRRRRR  R R R 
45689  10  11  12  12345689  10  11  12  13  123456789  10  11  12  12345678910  11  12  13 

♦ RRRRRRRR  R R -RRRRRRRR  R R R -RRRRRRRRR  R R ♦RRRRRRRRR  R R R 

1 2 3 4 6 8 9 10  11  12  l 2 3 4 6 8 9 10  11  12  13  l 2 3 4 6 7 8 9 10  11  12  1 2 3 4 6 7 8 9 10  11  12  13 

♦ RRRRRRRRR  R -RRRRRRRRR  R R ♦RR  -RRRRR  R -RRRR  ♦RRRRRR  R -RR* 

1234568911  12  12345689  11  12  13  15  1569  11  13  1567  15679  11  13  15 

RRR  ♦RRRRR  R R ♦RRRRRR  -RRRRRR  R R -RftRRR  R ♦RRRRR  R R ♦RRRR* 

6 9 10  1 5 6 9 10  1 1 13  1 5 6 7 9 10  l 5 6 7 9 10  ll  13  1 5 6 9 11  12  1 5 6 9 11  12  13  1 5 6 7 

RR  R -RRRRRR  R R ♦RRRRR  R R -RRRRR  R R R -RRRRRR  R R ♦RRRRRR  R * 

9 11  12  1 5 6 7 9 11  12  13  l 5 6 9 10  11  12  1 5 6 9 10  11  12  13  1 5 6 7 9 10  11  12  1 5 6 7 9 10  11 

ft  R -RRRRR  ♦RRRRRRRR  R 

12  13  12345  l 2 3 4 5 6 9 11  13 
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historical  information  for  each  component  in  module  a 


COMPONENT 

TYPE  SUCCESS  (BETA) 

EQUIVALENT  Ml  SSI ONS! GA  MMA) 

failures 

PRIOR  DISTRIi 
MEAN 

1 

T I ME- TO- FA ILURE ( GAMMA ) 

96.50 

2.00 

0.96985 

2 

ATTRI BUTE I86TA) 

99.00 

1.00 

0.98039 

3 

T IME-  TO-F  AIL  UR  El  GAMMA  ) 

96.  50 

2.00 

0.96985 

4 

ATTRI  0UTEI  BETA) 

99  .00 

1.00 

0.98039 

5 

TIME- TO-FA ILURE ( GAMMA ) 

96.50 

2.00 

0.96985 

6 

ATTR  I eUTEI  BETA  ) 

99.00 

1.00 

0.98039 

7 

TIME -TO-F A I LURE l GAMMA) 

96.50 

2.00 

0.96985 

8 

ATTR I BUTE! BETA) 

99.00 

1.00 

0.98039 

9 

T IME— TO-F A ILURE! GAMMA  ) 

9 6.50 

2.00 

0.  96985 

10 

ATTRI BUTE! BETA) 

99.00 

1 .00 

0.98039 

11 

T IME-  TO-F  A ILURE!  GAMMA  ) 

96.50 

2.00 

0.96985 

12 

ATTPI  eUTE I BETA) 

99.00 

1.00 

0.98039 

13 

T IME- TO-F A ILURE! GAMMA ) 

96.50 

2.00 

0.96985 

SPARCS  ::  SYSTEM  SIMULATION  ROUTINE 


SYSTEM  RELIABILITY  CALCULATED  FROM  MEAN  COMPONENT  RELIABILITIES  IS  0.903486:  SYSTEM  UNRELIABILITY  IS  0.096514 


AVERAGE  SYSTEM  RELIABILITY  FROM  20  MONTE  CARLO  TRIALS  IS  0.901238  I AVERAGE  SYSTEM  UNREL I A B I LTY  IS  0.098762 
VARIANCE  0.000671 

STANDARD  0EVIAT10N  0.  025896 

THE  MISSION  TIME  IS  100.000  HOUR 

the  estimated  system  mtsf  baseo  upon  mean  component  reliabilities  is  9.B5000000E+02 

THE  ESTIMATED  SYSTEM  MTBF  BASED  UPON  MEAN  SYSTEM  RELIABILITY  20  MONTE  CARLO  TRIALS  IS  9. 61 669678E+ 02 


PERCENT  ILE 

RE  LI AB  I LI TY 
PERCENT  IL  E 

POI  NTS 

MTBF 

PERCENTILE 

POINTS 

5.0 

PERCENT 

0.84  8968 

6. 1 074  804  7E  +02 

HOUR 

10.0 

PERCENT 

0.86  5494 

6.9226001 OE *02 

HOUR 

20.0 

PERCENT 

0.878241 

7. 7 02  094  7 3E  •♦■02 

HOUR 

25.0 

PERCENT 

0.884024 

8.  1122119  1E+02 

HOUR 

50.0 

PERCENT 

0.904296 

9.94052002E+02 

HOUR 

75.0 

PERCENT 

0.92  1494 

i.  2231001  OE  *03 

HOUR 

80. 0 

PERCENT 

0.924041 

1. 2798613  3E+0  3 

HOUR 

90.  0 

PERCENT 

C.  92  5575 

l. 36934155E+03 

HOUR 

95.0 

PERCENT 

0.933471 

1. 452530036  + 03 

HOUR 

97.5 

PERCENT 

0.937314 

1 .54470239E+03 

hour 

99.0 

PERCENT 

C. 935619 

1. 6056362 3E+03 

HOUR 
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Case  6 follows.  Note  that  the  module-B  five-page  probability 
equation  with  421  terms  based  on  26  cuts  is  given  with  U's  (for  "unre- 
liability") rather  than  R’s  (for  "reliability"),  as  in  the  reliability 
equation  for  Case  1. 
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COOCOOOOOU LI  1111  11222  2222  2223  333333333444444444455555555556666666666777777 
123456  7 8901 23456  7 890123456  78  90  1234  56 78  90 1234567 890 12 3456 78  9 OL 23456 789 012345 

CARD 

0001  SOFTWARE  RELIABILITY  - UNRELIABILITY  COMPUTATION  -JR  BROWN  AND  UPOW 

0002  20  2794360  100 


0003 

2 2 1 RHOUR 

CCC4 

•11  *B 

0005 

UA  7 4 

0006 

•0 ' B 96.5 

2 . 

00  C 7 

•l'B  99. 

1. 

0008 

• 1 ' B 99. 

1. 

0009 

•l'B  99. 

1 . 

00  10 

' 0 • B 96.5 

2. 

0011 

•l'B  99. 

1. 

0012 

•l'B  99. 

1. 

0013 

• 10  00000*  B 

0014 

•00  10000 'B 

0015 

•0000100' B 

0016 

•OOCOOOl'B 

0017 

UB  13  26 

OOld 

■ 0 ' B 96.5 

2 . 

0019 

•l'B  99. 

1. 

0020 

' 0 ' B 96.5 

2. 

0021 

•l'B  99. 

1 . 

0022 

• 0 • B 96.5 

2. 

0023 

•l'B  99. 

1. 

0024 

' O' B 96.5 

2 . 

0025 

•l'B  99. 

1. 

0026 

' 0 ' B 96.5 

2. 

002  7 

•l'B  99. 

1. 

0028 

• 0 • B 96.5 

2. 

0029 

•L'B  99. 

1. 

003  C 

' O'  B 96.5 

2. 

003  1 

' 10000 10000  000 ' B 

0032 

' 1000001010000' B 

0033 

•01C0110000000' B 

0034 

'00 101 10000  COO'B 

0035 

•0001110000000*  B 

003  6 

• 10  C0001 00 1 100' B 

0037 

• 10  0010011 OOOO'B 

0038 

• 1000100 100  100*  B 

0039 

' 1000100100001*  B 

0040 

•0100L00100 100'B 

0041 

•0100100100001  • B 

0042 

• 01  C01  01010000'  B 

0043 

•0010101010000'B 

0044 

•00  10100110000' B 

0045 

• 0010100100  100'  B 

0046 

•0010100  100001'B 

0047 

'0001101010000' B 

0048 

•OOCllOOllOOOO'  B 

0049 

•0001100100 100'B 

0050 

•OOOILOOIOOOOI ' B 

0051 

' 1000001001011'  B 

0052 

•0100101001  100  * B 

0053 

'0100101001001*8 

00  54 

• 00  1010  100 1 100 • B 

0055 

• 01  00101001  001 ' B 

0056 

•0001101001  100'B 

0057 

SEN  DL 1ST 
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• SPARCS* 

SIMULATION  PROGRAM  FOR  THE  ANALYSIS  OF  THE  RELIABILITY  OF  COMPLEX  SYSTEMS 


SYSTEM  IDENTIFICATION 
NUMBER  OF  SIMULATIONS 
NUMBER  OF  MODULES 
NUMBER  OF  COMPONENTS 
NUMBER  OF  MINIMAL  FATHS 
TYPE  OF  ANALYSIS 


SOFTWARE  RELIABILITY  - UNRELIABILITY  COMPUTATION  -JR  BROWN  AND  LIPOW 
20 
2 
2 
1 

RELIABILITY 


SPARCS  ::  EOUATION  GENERATION  ROUTINE 

THE  1 MINIMAL  PATH  FOR  SYSTEM 
<A.B> 

NUMBER  OF  TERMS  IN  EOUATION:  1 


R « R R 
SYS  A B 


THE  A MINIMAL  CUTS  FOR  MOOULE  A 


<1> 

<3> 

<5> 

<7> 


NUMBER  OF  TERMS  IN  EOUATION:  15 


u - u 

A 1 

♦ U - U U ♦ U - U U - 
3 13  5 15 

U U 

3 5 

♦ U U U ♦ U - UU 

1 3 5 7 1 7 

- u u ♦ u u u 

3 7 13  7 

-UU  ♦UUU  ♦ u u u 

57  157  357 

HISTORICAL 

INFORMATION  FOR  EACH  COMPONENT 

IN  MOOULE  A 

COMPONENT 

TYPE  SUCCESS  I BET  AJ 

EQUIVALENT  MISSIONS! GAMMAI 

FAILURES 

PRIOR  DISTRIBUTION 

MEAN 

1 

T IME-TO-FAIIUREI  GAMMA) 

96.50 

2.00 

0.969851 

2 

ATTRI BUTE ( BETA) 

99.00 

1.00 

0.980392 

3 

ATTRIBUTE! BETA) 

99.00 

1.00 

0.980392 

4 

ATTRI  EUTEC  BETA) 

99.00 

1.00 

0.980392 

5 

TIME  - TO-F  A 1 1 URE ( GAMMA ) 

96.50 

2.00 

0.969851 

6 

ATTRI  ajTE!  BETA) 

99.00 

1.00 

0.980392 

7 

ATTRI  BUTE ( BETA ) 

99.00 

1.00 

0.980392 

U U U U 
13  5 7 


THE  26  MINIMAL  CUTS  FOR  MOOULE  B 
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<1.  6 > 

<1  * 7 * 9> 

<2 • 5 »6> 

<3*5, 6> 

<4.  5,  6> 

<1,7,  10.  ll> 

<1 , 5 • 8 , 9> 

<1,5.8, 11> 

<1, 5. 8.  13> 

<2,5,8, 11> 

<2 , 5 , 8 , 1 3> 

<7 , 5, 7 » 9> 

<3*  5,  7. 9> 

<3 » 5, 8, 9> 

<3 ,5,8, 11> 

<3 , 5 • 8 . 1 3> 

<4,  5,  7.  9> 

<4 , 5 . 8 , 9 > 

<4 ,5,8 . 11> 

<4,5.8, 13> 

<1,7, 10. 12, 1 3> 

<2.5.  7,  10,  U> 

<2 .5.7 ,10,13> 

<3,5,7, 10. 11> 

<2. 5. 7,  10,  13> 

<4,5,7,  10,  ll> 

NUMBER  OF  TERMS  IN  EQUATION:  421 


u « U U ♦ UUU  -UUUU 
B 1 6 1 7 9 1 6 7 9 


UUU 
2 5 6 


UUUU  ♦ UUU 
1 2 5 6 3 5 6 


UUUU  -UUUU  ♦ UUUUU  ♦UUU 
1356  2356  12356  456 


UUUU* 
14  5 6 


-UUUU  ♦ UUUUU  -UUUU  ♦ UUUUU  + UUUUU 
2456  12456  3456  13456  23456 


UUUJUU  ♦ UUU  U -UUUU  U -UUU* 
123456  17  10  11  167  10  11  179 


U U ♦ UUUUU  U ♦UUUU 
10  11  1 6 7 S 10  11  1589 


UUUUU  - UUUUU  ♦ UUUUUU  ♦ 
15689  15789  156789 


UUUU  -UUUUU  -UUUUU  * 
158  11  1568  11  1578  10 


U ♦ UUUUUU  U ♦ U U U U U U U 
11  1 5 6 7 8 10  11  1 5 7 8 9 10  11 


UUUUUUU  U -UUUUU  ♦UUUUUU  ♦UUUU  -UUU* 
156789  10  11  1589  11  15689  11  158  13  156 


UU  -UUUUU  ♦UUUUUU 
8 13  1 5 8 9 13  l 5 6 8 9 13 


UUUU  U ♦UUUUU  U ♦ U UUUU  U 
1 5 8 11  13  1 5 6 8 11  13  1 5 8 9 11  13 


UUUUUU  U ♦ U U U U * 
1 5 6 8 9 11  13  2 5 8 11 


♦ UUUUUU  -UUUUU 
12568  11  2568  11 


UUUUU  ♦UUUU  ♦UUUUUU 
1258  11  258  13  1256813 


UUUUU  ♦UUUUU  U -UUUU* 
2568  13  1258  11  13  1256 


UU  U -UUUUU  -UUUU  J 
8 11  13  l 2 5 8 13  2 5 8 11  13 


UUUUU  U ♦UUUU  ♦ U J u u u u 
2568  11  13  2579  125679 


UUUUU 
1 2 5 7 9 


UUUUU  ♦ U U * 
2 5 6 7 9 1 2 


UUUUU  -UUUUJUUU  ♦UUUUUUU 
5789  11  1256789  11  1 2 5 7 8 9 13 


UUUUUUUU 
1 2 5 6 7 8 9 13 


UUUUUUU  U ♦UUUUUUUU  U 
125789  11  13  1256789  11  13 


-UUUUUU  ♦UUUUUUU 
25709  11  256769  11 


UUUUUU  ♦UUUUUUU  ♦UUUUUU  U 
25709  13  256789  13  25789  11  13 


UUUUUUU  U ♦U* 
25678911  13  3 


UUU  + UUUUUU 
579  135679 


UUUUU 
1 3 5 7 9 


UUUUUU  - UUUUUUU 
235679  1235679 


UUUUU  - UUUUU  ♦UUUUUU 
35679  23579  123579 


U U * 
3 5 
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u u ♦ 

8 9 


U U 
9 li 

- U U 

2 : 

u ♦ u 

9 : 


u u u I 

3 5 6 


♦ U U 
2 : 


u 

13 


- U U 
l ; 


U U U I 
5 8 9 

U U - 
7 9 

u u u 
3 A 5 

u - u 

9 


U U U 
4 5 6 


u u 

9 13 

u u u 

7 8 9 


u u 

9 13 


U U U 
7 8 9 


U U U 
5 6 7 


U l U 
4 5 i 


u u u 

4 5 


u u u u u u 

1 3 5 6 8 9 


uuuuuu  -uuuuuuu  -uuuuu  -uuuuu 

135789  1356789  35689  13589 


UUUUUUUU  ♦ UUUUUUU* 
1235789  11  1235678 


tuuuiuuu  ♦ 

1 2 3 5 7 8 9 13 


uuuuuuuuu 

12356789  13 


♦ UUUUUUUU  U 
1235709  11  13 


UUUUUUUUU  U 
1235678911  13 


UUUUUUU  * 
2 3 5 7 8 9 11 


UUUUUU  ♦ UUUUUUU  -UUUUUUUU 
156789  11  235789  13  2356789  13 


UUUUUUU  U ♦UUUUUUUU  U -UUUU* 
235789  11  13  2356789  11  13  3578 


UUUUU  ♦UUUU 
56789  358  11 


UUUUUU 
1 3 5 6 8 11 


UUUUUU  -UUUUUUU  -UUUUU  ♦UUUUUU  - u * 
23568  11  123568  11  3 568  11  13589  11  1 


I u u 

8 9 11 


L U U U U 
1 3 5 8 11 


UUUUU  ♦ 
2 3 5 8 11 


UUUUUU 
1 2 3 5 8 11 


-UUUUU  ♦ 
3 5 8 9 11 


UUUUUU 
3 5 6 6 9 11 


♦ UUUU  ♦ 
3 5 8 13 


UUUUUU 
1 3 5 6 8 13 


UUUU 
I 5 6 8 13 


UUUUUUU 
1 2 3 5 6 8 13 


-UUUUU  ♦ 
3 5 6 8 13 


UUUUUU 
1 3 5 8 9 13 


UUUUUUU  ♦ 
I 3 5 6 8 9 13 


UUUUU  U 
1 3 5 8 11  13 


UUUUUU  * 
1 3 5 6 8 11 


lUUUUU  u ♦uuuuuuu  u 
1 3 5 8 9 11  13  l 3 5 6 8 9 11  13 


uuuuu  ♦uuuuu  u ♦uuuuuuu  u 

1 3 5 8 13  2 3 5 8 11  13  1 2 3 5 6 8 11  13 


uuuuuu  u 

2 3 5 6 8 11  13 


UUUU  U 
► 3 5 8 11  13 


UUUUU  ♦UUUUUU  -UUUUU  ♦UUUUUU 
2358  13  12358  13  3589  13  35689  13 


UUUUU  +UUUUUU  ♦ U * 
3 5 8 11  13  3 5 6 8 li  13  3 


U -UUUUUUU  ♦ 
11  13  3 5 6 8 9 11  13 


UUUU  ♦UUUUUU 
4579  145679 


UUUUU  ♦ U U U U U U - 
14579  245679 


UUUUUUU  ♦UUUU* 
1245679  3456 


UUUUUUU  — U U U U U UU  ♦UUUUUUUU 
1345679  2345679  12345679 


UUUUU  - UUUUU  ♦ UUUUUU  - UUUUU  ♦u* 
45679  24579  124579  34579  1 


UU  ♦UUUUUU  - UUUUUUU  ♦ 
79  234579  1234579 


UUUU  ♦UUUUUU  ♦UUUUUU 
4589  145689  145789 


UUUUUUU  ♦ U UUUU* 
1456789  34568 


UUUUUU  - UUUUU 
1345689  45689 


LUUUU  - UUUUUUUU  ♦UUUUUUUUU 
14589  1245789  11  12456789  11 


UUUUUUUU  ♦UU* 
1245789  13  12 


UUUU  4UUUUUUUU  u 
789  13  1245789  11  13 


UUUUUUUUU  U ♦uuuuuuu 
12456789  11  13  245789  11 


UUUUUUUU  ♦ U U U U U * 
2456789  11  24578 


-LUUUUUUU 
2456789  13 


UUUUUUU  U + UUUUUUUU  U ♦ U U U U u u 
245789  11  13  2456789  11  13  345789 


UUUUUUUU  - UUUU* 
13456789  1345 


-UUUUUUU  - UUUUU 
3456789  34589 


UUUUUU  + UUUUUUUUU 
134589  12345789  11 


UUUUUUUUUU 
123456789  11 


UUUUUUU* 
1 2 3 4 5 7 8 


-LUUU  UUUUUU 
123456789  13 


UUUUUUUUU  U ♦UUUUUUUUUU  U 
12345789  11  13  123456789  11  13 


UUUUUUUU  ♦UUUUU* 
2345789  11  23456 


U 

11 


UUUUUUUU  ♦ 
2345789  13 


UUUUUUUUU  ♦ 
23456789  13 


UUUUUUUU  U 
2345789  11  13 


UUUUUUUUU  U 
23456789  11  13 


UUUUU  ♦u* 
4 5 7 8 9 4 


UU  ♦UUUU  ♦UUUUUU 
89  458  11  14568  11 


♦ UUUUUU  -UUUUUUU  ♦UUUUUU 
24568  11  124568  11  34568  11 


UUUUUUU  -UU* 
134568  11  23 


UU  ♦UUUUUUUU  -uuuuu  ♦uuuuuu 
,811  123456611  456811  14589  11 


uuuuuuu 

' 45689  11 


UUUUU  -UUUUU  ♦UU* 
1458  11  2458  11  12 


U ♦ U U UUUU  ♦UUUUUUUU 
ill  34589  11  1345689  11 


UUUUUUU  -UUUUUUU 
345689  11  134589  11 


UUUUU  +UUUUUU  ♦ U * 
3458  11  13458  11  2 
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UIIUUU  -uuuuuuu  -uuuuu  ♦uuuuuu  ♦ u u u u ♦ u u u u u u ♦ u u u u u u -uuuu* 

34  58  11  123458  11  4589  11  4568911  458  13  14568  13  24568  13  1245 

UUU  ♦UUUUUU  -UUUUUUU  -UUUUUUU  + UUUUUUUU  -UUUUU  +UUUUUU  - u * 

68  13  34568  13  134568  13  234568  13  1234568  13  4568  13  14589  13  1 

UUUUUU  ♦ UUUUU  U -UUUUUU  U -UUUUUU  U + UUUUUUU  u -uuuuu  ♦ u u u u * 

45689  13  1458  11  13  14568  11  13  14589  11  13  145689  11  13  1458  13  2458 

U U +UUUUUUU  U -UUUUUU  U -UUUUUU  U -UUUUU  ♦ U U U U U U ♦ u u u u u u ♦ u * 

11  13  124568  11  13  24568  11  13  12458  11  13  2458  13  12458  13  34589  13  1 

uuuuuuu  -UUUUUUU  -UUUUUUU  ♦ UUUUU  U ♦ UUUUUUU  U +UUUUUUU  u -u* 

345689  13  345689  13  134589  13  3458  11  13  134568  11  13  234568  11  13  l 

uuuuuuu  U -UUUUUU  U ♦ UUUUUUU  U -UWUUUUUU  u -uuuuuu  u -uuuuu* 
234568  11  13  34568  11  13  134589  11  13  1345689  11  13  13458  11  13  23458 


u u + uuuuuuu  u -uuuuuu  u ♦uuuuuuu  u -uuuuu  ♦uuuuuu  ♦ u u u u u u 

11  13  123458  11  13  34589  11  13  345689  11  13  3458  13  13458  13  23458  13 

-uuuuuuu  -uuuuu  ♦ uuuuuu  -uuuu  u ♦ u u u u u u ♦ u u u u u u -uuuuuu  * 

123458  13  4589  13  45689  13  458  11  13  4568  11  13  4589  11  13  45689  11 


U + U U U J U 
13  1 7 10  12  13 


UUUU  u u -uuuu  u u ♦ uuuuu  u u 
1 6 7 10  12  13  1 7 9 10  12  13  l 6 7 9 10  12  13 


UUUUUU  +UUUU  U U U 
1 7 10  11  12  13  l 6 7 1 0 11  12  13 


♦ UUUU  U U U -UUUUU  u u u ♦ uuuuuu  u u -uuuuuuu  u u ♦uuuuu  u u u 

l 7 9 10  11  12  13  1 6 7 9 10  11  12  13  1 5 7 8 9 10  12  13  1 5 6 7 8 9 10  12  13  1 5 7 8 10  11  12  13 

-UUUUUU  L U U -uuuuuu  u u u ♦uuuuuuu  u u u -uuuuu  u u ♦UUUUUU  * 

1 5 6 7 8 10  11  12  13  l 5 7 8 9 10  11  12  13  1 5 6 7 8 9 10  1 l 12  1 3 1 5 7 8 10  12  13  l 5 t 7 8 10 

U U + U U U U U ♦ U U U U U U U +UUUUUU  u -uuuuuuu  u -uuuuu  u -uuuuu  u * 

12  13  2 5 7 10  11  1 2 5 6 7 10  11  1 2 5 7 9 10  1 1 1 2 5 5 7 9 10  11  2 5 6 7 10  11  1 2 5 7 10  11 

-uuuuuuu  u ♦uuuuuuuu  u ♦uuuuuu  u -uuuuuuu  u -uuuuu  u ♦uuuuu* 

125789  10  11  1256789  10  11  12578  10  11  125678  10  11  2578  10  11  25678 


u u -uuuuu  u uuuuuuu  u ♦ uuuuuu  u -uuuuuuu  u -uuuuu  u ♦ u u u u u * 

10  11  2 S 7 9 10  11  2 5 6 7 9 10  11  2 5 7 8 9 10  11  2 5 6 7 8 9 10  11  2 5 6 7 10  13  2 5 7 8 10 


u u -uuuuuu  u u -uuuuu  u ♦uuuuuu  u -uuuuu  u + uuuuuu  U -ULUUU* 

11  13  2 5 6 7 8 10  11  13  2 5 7 8 10  13  2 5 6 7 8 10  13  2 5 7 9 10  13  2 5 6 7 9 10  13  2 5 7 8 9 


U U U + UUUUUUU  U U +000000  U -UUUUUUU  U -UUUUU  U U +UUUUUU  u u 

10  11  13  2 5 6 7 8 9 10  11  13  2 5 7 8 9 10  13  2 5 6 7 B 9 10  13  1 2 5 7 10  12  13  1 2 5 6 7 10  12  13 

♦ UUUUUU  U U -UUUUUUU  U u ♦ u u u u u u u u -UUUUUU  u u u -uuuuuu  u * 

1 2 5 7 9 10  12  13  1 2 5 6 7 9 10  12  13  1 2 5 7 10  11  12  13  1 2 5 6 7 10  1 1 1 2 1 3 1 2 5 7 9 10  11 

U U +UUUUUUU  U U U -UUUUUUU  U U +00000000  u u -uuuuuu  u u u +u* 

12  13  1 2 5 6 7 9 10  11  12  13  1 2 5 7 8 9 10  12  13  1 2 5 6 7 6 9 1 0 12  1 3 1 2 5 7 8 10  1 1 12  13  1 

UUUUUU  U L u +UUUUUUU  U U U -UUUUUUUU  U U U +UUUUUU  u u -uuuuu* 

2 5 6 7 8 10  11  12  13  1 2 5 7 8 9 1 0 1 1 12  13  1 2 5 6 7 8 9 l 0 1 1 1 2 13  1 2 5 7 8 10  12  13  12567 

UU  U U -UUUU  U U +UUUUU  U U +UUUUU  U U -UUUUUU  U'U  +UUUU  u ♦ u u * 

8 10  12  13  2 5 7 10  11  13  2 5 6 7 10  11  13  2 5 7 9 10  11  13  2 5 6 7 9 10  11  13  3 5 7 10  11  13 
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VVVYll  * Y3Y7YY1I  ' “tVsYSVYll  * YsYbYYh  ' Y YbYbYYi  l " YAVl  0\  1 ' V 
YsYYll  ' YsVtY.Vu  * VbYgVbVYh  * YsYlYYll  ‘ YsYgYbVh  * YjVtYYY 

♦ VzYYgVbVh  " VsY.WYll  " YAYlYYll  * WsWYll  * YaVsYlYYll  ' Y*‘ 
Y5Y9YY  " “AWtVYu  * YaYsVaYYll  " Y2YsY YeVYll  ' YsWsVYlI  + YsV 

V7U8U9U10 UU  ' YsVAoY  * U3Y6U7U9U10U11  * YsVbYYu  ' YsYtYAoY  ' WVYYll  Y* 

W.Vll  ' VsVtVu  * Y.YsYYll  + YsYYlS  * YsVYll  * Y^YlYY  + “iVsVqV 
UU  ' “tVsYlVYll  * YVVWYll  ' YAYgVYh  * Y4W7V1I  ‘ YsWbVYll  W* 

V*VlOUll  * YAYs^VYll  ' YsYlYY  ' “ lY sY  Y 11  ' “lYsVeVYll  * YaVbVs  9 10  11 

♦ Y.VlVYl,  - W.VlVYll  * YaYtYYh  + VAYAVYll  ' V4YAYY1I  ' Y«W 
U7UBU10U11  + Y4Y7YY1I  * YAVAVYll  ' YAVtYYh  ' VVVYtVYu  * Y.YsVbYY 
°U  “ VAYAYsVll  ' YAV.VYll  * WsWeVYll  * WsWYli  * YsVsWAoV 

- UiVAU7U9UioUu  ♦ VaYsYlYYl!  “ YAYsYlYYll  ' WsVlVYll  ' YsWtVYu  * V 
V3Y5U7U9U10UU  ‘ YAVaVYll  ‘ VsVsYlYAcAl  * YjYsVsVYll  ' Uj“W7UbVYu  1 
WAV.VYll  + YzYaYgYbVYh  + YsVsYbVYu  " WVVYtWYu  * 

♦ VaVsYlYYll  * VsYsYlVYll  ' YAYsYlYYll  ‘ V4W7VY1I  “ YbYsVbW 

- YYaYtYYiI  * VAVsWYll  " WiVYll  + VsYtVYu  + YsYbVYu  YA  7 8 9 
Vn  - Y5U7U8U10U11  + YsYtVYh  ' VaYtVh  * VAYlVY  ‘ °3  YsYYll  * 


♦ U U U U U U U -UUUU  U U U u 
234571011  123457  10  11 


historical 

INFORMATION  FOR  EACH  COMPONENT  IN  MODULE  B 

COMPONENT 

TYPE 

SUCCESS  ibetai 

FAILURES 

PRIOR  DISTRIBUTION 

EQUIVALENT  MISSIONS!  GA  MMA ) 

MEAN 

l 

T I ME  — TO— F A I LURE  I GAMMA ) 

96.50 

2.00 

0.969851 

2 

ATTRI  ELITE  1 BETA) 

99.00 

1.00 

0.980392 

3 

T IME-TO-F A I LURE  1 GAMMA) 

96.50 

2.00 

0.969851 

4 

ATTRI  BUTE  1 BETA) 

99.00 

1 .00 

0.980392 

5 

T IME-TO-F  A IL  UR  E t GAMMA  1 

96.50 

2.00 

0.969851 

6 

ATTRI BUTE (BETA) 

99.00 

1.00 

0.980392 

7 

T IME-TO-F  A ILUKE  I GAMMA  1 

96.50 

2.00 

0.969851 

8 

ATTRI  BUTE!  BETA) 

99.00 

1.00 

0.980392 

9 

TIME-TO-FAILIKEl  GAMMA) 

96.50 

2.00 

0.969851 

10 

ATTRIEUTE(BETA) 

99.00 

1.00 

0.980392 

11 

T IME-TO-F A I LURE! GAMMA  1 

96.50 

2.00 

0.969851 

12 

ATTRIBUTEIBETA) 

99.00 

1.00 

0.980392 

13 

T IME-TO-F A ILUREI GAMMA) 

96.50 

2.00 

0.969851 
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SPARCS  ::  SYSTEM  SIMULATION  RCUTINE 


SYSTEM  RELIABILITY  CALCULATED  FROM  MEAN  COMPONENT  RELIABILITIES  IS  0.903486;  SYSTEM  UNRELIABILITY  IS  0.096514 

AVERAGE  SYSTEM  RELIABILITY  FROM  20  MONTE  CARLG  TRIALS  IS  0.909538  ; AVERAGE  SYSTEM  UNRELIABILTY  IS  0.0904E2 
VARIANCE  0.000625 

STANDARD  OEVIATICM  0.024996 


TFE  MISSION  TIME  IS  103  .000  HOUR 

THE  ESTIMATED  SYSTEM  MTSF  BASED  UPON  MEAN  COMPONENT  RELIABILITIES  IS  9 .85000000E  + 02 

TFE  ESTIMATED  SYSTEM  MT8  F BASED  UPON  MEAN  SYSTEM  RELIABILITY  20  MONTE  CARLO  TRIALS  IS  l . 05464673E+03 


percentile 

reliability 

PERCE  NTI  LE 
POINTS 

MTBF 

PERCENTILE 

P.OI  NTS 

5.0 

PERCENT 

0.86  3285 

6.80221680E+02 

HOUR 

10.0 

PERCENT 

C. 874934 

7.48464844E+0 2 

HOUR 

20.0 

PERCENT 

0.889750 

8-5  60  5712  9E +02 

HOUR 

25.0 

PERCENT 

0.893619 

8. 89078657E+02 

HOUR 

50.0 

PERCENT 

0.908336 

1.04013916E  + 03 

HOUR 

75.0 

PERCENT 

0.927487 

1 -32843164E+0 3 

HOUR 

80.0 

PERCENT 

C. 929598 

1-3 69 7978 5£ +03 

HOUR 

90.0 

PERCENT 

0.94 30d8 

l. 7066084 OE+O 3 

HOUR 

95.0 

PERCENT 

C.  94  8863 

1.9050d569E*03 

HOUR 

97.5 

PERCENT 

0.95  1640 

2. 01741 94  3E + 03 

HOUR 

99.  0 

PERCENT 

0.953307 

2.0912351  1 E +0  3 

HOUR 

It  is  both  interesting  and  instructive  to  compare  the  results  of  the 
two  outputs,  as  shown  particularly  in  the  assessment  tables.  The  medians 
or  50-th  percentiles  are  nearly  identical,  .904296  in  Case  6 and  .908336 
in  Case  1.  For  both  problems,  percentiles  below  the  80th  are  very  close  to 
each  other.  For  specified  percentiles  above  the  80th,  Case  I gave  higher 

assessments.  Since  each  output  is  based  on  only  20  Monte  Carlo  trials, 
these  differences  do  not  seem  to  be  excessive.  Even  closer  results 
would  be  and  have  been  obtained  with,  say , 100  Monte  Carlo  trials. 
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OPERATING  INSTRUCTIONS 


The  operating  instructions  for  the  SPARCS-2  program  included  in  this 
manual  are  specific  for  the  IBM  series  370/158  (MVS  environment)  computer 
system  in  operation  at  the  University  Computer  Center  at  Oklahoma  State 
University.  The  system  includes  a PL/1  optimizing  compiler.  The  control 
cards  needed  at  any  computer  installation  will  depend  upon  local  practices 

Instructions  for  Using  Source  Desk 


The  following  desk  structure  may  be  used  with  the  SPARCS-2  source 
desk.  Note  that  the  facsimilies  for  two  of  the  80-column  control  cards  are 
shown  split  in  half. 
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Where: 


"nnnnn"  is  a five-digit  account  number. 

"sss-ss-ssss"  is  your  social  security  number. 

"AG,  A,  X"  are  the  options  usually  run  with  the  source  desk 
to  aid  in  diagnostics  and  debugging.  Specifying  these  options 
generates  additional  printout  information  about  the  source 
desk.  Option  "AG"  lists  an  aggregate  length  table;  option  "A" 
lists  a full  attribute  and  cross-reference  table;  and  option 
"X"  lists  a cross-reference  table.  The  options  available  may 
vary  from  one  computer  center  to  another. 


Instructions  for  Using  Load  Module 


A compiled  copy  of  the  SPARCS-2  program  may  be  stored  in  a disk  library. 
The  compiled  version  may  then  be  used  again  without  recompilation.  The 
following  desk  structure  stores  the  program  on  the  disk. 


1 

o 

u 

NUMSE#  | 

' FORTRAN  STATEMENT 

1 

.’3  4 ' 1 ■ 

- '!■  :r  ?■  72  <-4  -5  ;4  27  .-3  :?  20  31  33  34  35  34  37  35  39  jc  ji  42  43  44 

/ 

/SE$: 

mmumm 

07«.  v: 

WSmBKSSO 

IBS 

IBS 

a 

no  me}' 

J101D 

SS-c, 

iimE  =;<•  (coni; 

mu 

■l 

■B 

0 

FPPPi 

, ; , | 
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i l 
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ill' 

i 
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X PL 
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; 

fi 
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svsr 

Ai  bb 
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|Hj 

nm 

i ! 1 i 

| 

; i 

1 

- dcipu 

.of  Smc 
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be.  Co r ripli 

/ 

\od  ond 

’ ; ; — 1 — 

! ; 

: ' i 

; i | 

■ 

...  p/scp 

d /o  disk 
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Where:  "xxxxxxxx"  is  the  name  specified  to  store  the  program. 
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The  following  example  demonstrates  a deck  structure  necessary  to  compile 
a PL/1  program  and  subroutines  and  store  them  in  the  library  designated 
OSU.  ACTXXXXX.  SPARCS  under  the  name  SP ARCS-2. 


I 


The  following  deck  structure  executes  the  stored  SPARCS-2  program  from 
the  disk  library. 


GLOSSARY 


General  Terminology 


assessment:  a schedule  of  system  reliability  or  MTBF  values  as  a function 

of  the  confidence  coef f icients , the  component  historical  success-or- 
failure  data  and  the  system  logical  configuration,  under  an  appropriate 
general  statistical,  probabilistic,  and  logical  model* 

Bayesian  techniques:  reliability  assessment  of  components  from  prior  dis- 
tributions whose  parameters  are  functions  of  available  data. 

Bernoulli  process:  governs  the  occurrence  of  failures  for  each  pass-fail 
type  component;  the  results  of  successive  trials  are  independent 
and  the  probability  of  success  on  every  trial  is  the  component 
reliability. 

beta  component:  success-or-failure  attribute  component. 

beta  distribution:  for  each  pass-fail  type  component,  the  conjugate  prior 
distribution  on  R is  "beta",  with  its  parameters  being  functions  of 
prior  failures  and  prior  tests. 

coherent  system  (coherence):  the  "zero"  state  (0,  ...,  0),  all  components 

failed,  is  a system  failure  state  or  cut;  the  "one"  state  (1 1), 

all  components  succeeding,  is  a system  success  state  or  path;  no  paths 
are  contained  in  any  cuts,  in  the  sense  of  partially  ordered  sets. 

conjugate  prior  distribution:  a prior  distribution,  such  as  beta  or 

negative-log  gamma,  which  has  a similar  mathematical  form  to  the  dis- 
tribution describing  events,  and  for  which  the  parameters  are  sufficient 
statistics  for  the  prior  data. 

gamma  component:  time-to-f ailure  component. 

MTBF:  the  average  operating  time  between  failures;  defined  only  for  systems 

with  a mission  time. 

minimal  cut:  a set  of  components  which,  if  they  are  all  failed,  cause  the 
system  to  fail,  but  if  any  of  them  function  (and  all  other  components 
function),  the  system  operates;  the  system  is  assumed  to  be  coherent. 

minimal  path:  a set  of  components  which,  if  they  are  all  functioning,  per- 
mits the  system  to  function,  but  if  any  of  them  fails  (and  no  other 
components  operate),  the  system  fails;  the  system  is  assumed  to  be 
coherent . 
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modularization:  by  breaking  the  system  up  into  a logical  configuration 

of  independently  failing  subsystems,  as  used  herein,  each  system  can 
be  represented  as  a configuration  of  modules,  with  each  module  being 
a logical  configuration  of  independently  failing  components. 

Monte  Carlo:  ' beta  or  gamma  random  deviates  are  generated  to  obtain  the 

component  reliability  (or  unreliability)  values  which  are  substituted 
into  the  system  probability  function. 

negative-log  gamma  distribution:  for  each  time-to-failure  component,  the 
prior  distribution  on  the  component  reliability  is  negative-log  gamma, 
with  its  parameters  being  sufficient  statistics  for  the  prior  data, 
failures,  and  testing  time  (normalized  to  mission-equivalent  units). 

Poincard's  theorem:  builds  the  system  reliability  function  recurrently 
one  minimal  path  at  a time  from  the  minimal  paths;  dually,  a system 
unreliability  function  can  be  built  up  from  the  minimal  cuts;  also 
known  as  the  method  of  inclusion-exclusion. 

Poisson  process:  assumed  for  each  time-to-failure  component;  failures  of 
individual  components  occur  at  a constant  rate  independent  of  prior 
history. 

reliability:  the  probability  that  all  assigned  functions  are  performed 

within  a predefined  time  frame  and  under  the  specified  environment 
or  environments:  the  probability  of  system  success. 

sufficient  statistics:  summary  statistics  which  provide  as  much  infor- 
mation about  a random  sample  as  if  the  value  of  every  single  obser- 
vation were  available. 

super  modularity:  modules  with  minimal-cut  unreliability  calculations 
can  be  intermixed  with  those  having  minimal-path  reliability  cal- 
culations to  obtain  the  system  reliability,  with  no  restrictions 
other  than  size  and  capacity  limitations. 

system:  a configuration  of  modules  unlike  one  another  where  each  module 
is  a configuration  of  possibly  unlike  components,  with  different 
failure-history  data;  beta  and  gamma  components  can  be  intermixed  with 
no  restriction  on  their  placement. 


31 


REFERENCES 


[1]  Burris,  Jimmy  L.,  "Model  for  the  Analysis  of  the  Proba- 
bilities of  Systems,"  MBA  research  report,  Department 
of  Administrative  Sciences,  Oklahoma  State  University, 
1972. 


[2]  North  American  Rockwell  Corporation  Space  Division, 

"Exact  Minimal-Path  Techniques  for  Determining  System 
Reliability,"  Program  MFS-16499;  available  through  NASA's 
COSMIC,  University  of  Georgia,  Athens,  GA  30601. 


[3]  North  American  Rockwell  Corporation  Space  Division, 

"System  for  Computing  Operational  Probability  Equations 
(SCOPE):  Version  II,"  Program  FMS-24035;  available 
through  NASA's  COSMIC,  University  of  Georgia,  Athens,  GA 
30601. 


[4]  Cooley,  John  W. , "Simulation  Program  for  Assessing  the 
Reliability  of  Complex  Systems  (SPARCS),"  Ph.D.  dissertation, 
Oklahoma  State  University,  April,  1976. 

[5]  Locks,  Mitchell  0.,  "Monte  Carlo  Bayesian  System  Reliability- 
and  MTBF-Conf idence  Assessment,"  Air  Force  Flight  Dynamics 
Laboratory,  Wright-Patterson  AFB,  Ohio,  AFFDL-TR-75- 144 . 

[6]  Brown,  J.  R.  and  M.  Lipow,  "Testing  for  Software  Reliability," 
TRW  Systems  Engineering  and  Integration  Division,  One  Space 
Park,  Redondo  Beach,  CA  90278,  TRW-SS-75-02 , January,  1975. 


32 


APPENDIX. 


"SPARCS-2"  SOURCE  DECK  LISTING 


PL/I  OPTIMIZING  COMPILER 


VilCUl  PRQC  OPTICMS  (MAINII 


MCI 


SOURCE  LISTING 


SPARCS2*  PROC  OPTICNS  (NAIM);  00000010 

/•  *700000020 

/••••*••••••••••••*••••••••  ••••••••••••••*••••  ••••••••••••••••••••••  ••700000030 

/•  *700000040 

/•  JPARCSII  {SIMULATION  P ROCK  AN  FOR  ASSESSING  THE  RELIABILITIES  Of  *700000050 
/»  COMPLEX  STSTEN  - VERSION  III  IS  4 SYSTEM  OF  PL/1  PROCEDURES  TO  *700000040 
/•  ASSESS  I MOV  IOE  INTERVAL  ESTIMATES  FOR)  THE  RELIABILITY  l NT  5 F OF  */0000007Q 
/*  A COMPLEX  SYSTEM  OF  ANY  LOGICAL  CONFIGURATION.  THE  COMPONENTS  CAN  */00000080 
f BE  EITHER  ATTRIBUTE  OR  I l ME -T O-F A ILUR6 I TT F) . alTHNO  RESTRICTION  *700000090 
/•  ON  THEIR  PLACEMENT.  BAYESIAN  A NO  MONTE  CARLO  TECmnIOuES  ARE  *700000100 

/•  EMPLOYED.  INPUTS  ARE  MINIMAL  STATES  FOR  SYSTEM  ANO  ITS  HOOULES  *700000110 
/•  ANO  COMPONENT  FAILURE-HISTORY  DATA.  MINIMAL  STAIES  ARE  MINIMAL  *700000120 
/•  PATHS « FOR  ‘RELIABILITY*  ANALYSIS  OR  MINIMAL  CUTS  FOR  *700000130 

/•  ‘UNRELIABILITY*  ANALYSIS.  OUTPUT  IS  A SClEOULE  OF  SYSTEM  *700000140 

/*  RELIABILITY  ANO  NT B F VALUES  ANO  ASSOCIATED  CONFIDENCE  LEVELS.  *700000150 

/•  NTBF  ANALYSIS  IS  OPTIONAL.  FOR  EACH  COMPONENT.  THE  RAN  DATA  ARE  •/00000160 

/•  EXPERIENCED  FAILURE  HISTORIES*  ACCUMULATED  SUCCESSES  ANO  FAILU»ES  *700000170 
t * FDR  ATTRIBUTES.  EXPERIENCED  TESTING  T I **E  [NORMALIZED  TO  MISSION  */OOOOOlBO 
7*  EQUIVALENT  UNITS  I ANO  FAILURES  FOR  TTF  COMPONENTS.  THE  SYSTEM  *700000190 
/•  CAN  CCHSIST  Cf  A COMPLEX  CONFIGURATION  OF  JP  TO  L2A  NODULES,  EACH  *700000200 
/•  MOOULE  BEING  A CCMPLEX  C tXf  I CUR  AT  I ON  OF  UP  TO  128  COMPONENTS.  *700000210 

/•  MOOUL ES  MITM  MINIMAL-PATH  RELIABILITY  ANALYSIS  CAN  OPTIONALLY  BE  *700000220 
7*  INTERMIXED  MlTM  POOULES  HAVING  MINIMAL-CUT  UNRELIABILITY  *700000230 

/•  CALCULATIONS.  THE  SYSTEM  CAN  OPTIONALLY  BE  A CONFIGURATION  OF  *700000240 
/*  CITHER  MINIMAL  PATHS  OR  MINIMAL  CUTS  IN  THE  MODULES.  OUTPUT  IS  *700000250 
/•  ALMAYJ  STANDARDIZED  TO  SYSTEM  RELIABILITY  ANO  ALSO  MT  BF  IF  R E OU ES - *700000260 


7*  TED.  OEFAULT  LABELLING  IS  ENPLDYEO  FOR  COMPONENTS  AND  MOOULES  IN 
f THE  PROBABILITY  EOUATION.  COMPONENTS  ARE  NUMBERED  SUCCESSIVELY 
7»  1.2.  ...  .128.  MODULES  ARE  SESUEmCEO  ALPHA  HJME  R I C ALLY  A.B.C.  ... 


/•  REFER  D.C  E S i 


MONTE  CARLO  BAYESIAN  SYSTEM  RELIABILITY  C 
MTBF  CONFIDENCE  ASSESSMENT.  TECHNICAL 
REPORT  AFFOL-TR-T5-144.  AIR  FORCE  FLIGHT 
DYNAMICS  l A BOR  ATOP  Y,  AIR  FORCE  SYSTEMS 
CORN  AND.  MRIGKT  PATTERSON  AIR  FORCE  BASE. 
1 97  5. 


700000270 

700000280 

700300290 

700000300 

•700000310 

•700000320 

•700000330 

•700000340 

•700000350 

•700000360 

•700000370 

700000380 


K.O.  LOCKS,  aa  [ABILITY. MAINTAINABILITY,  t AV  A IL  AB 1L  I T Y*  700000390 
ASSESSMENT..  HAYDEN  BOOR  CO..  1972.  *700000400 

K.R.LEE.  REJECTION  METHODS  FOR  GE'CRATING  RANDOM  *700000410 

0 EV 1 AT  E S C THEIR  APPLICATIONS  IN  SYSTEM  *700000420 

RELIABILITY.  MASTER'S  THESIS.  COMPUTING  ( *700000430 

INFORMATION  SCIENCES.  J.S.U..  1977.  *700000440 

4-U.  COOLEY.  SIMULATION  PROGRAM  FOR  ASSESSING  THE  *700000450 

RELIABILITY  OF  COMPLEX  SYSTEMS  ISPARCS).  *700000460 


PL7I  OPTIMIZING  COMPILER 
STMT 


SPRRCS2  « PROC  OPT  IMS  (MAIN  I I 


J-P  -CMA  NOLF 


/•  PROCEDURE  NAMES  (ZSEOi 

7*  ALCANA 

7*  CAST  A 

7*  COMPUTE 


EO  GEN 
COPUT 
CAUSF 
►CL  INE 
MISINF 


RCAMA 

SORT 

STAT 


MINPTH 

NARG 

NCOM 

NMOO 

NPATH 

SIMNUM 

STSIO 

TIME 

UNIT 


PH.O.  THESIS.  OKLAHOMA  STATE  UNIVERSITY, 

I *76. 

R.  RANF-UNIFORMLY  DISTRIBUTED  PSEUDO- 
RANDOM NUMBERS.,  UNPUBLISHED  DOCUMENT. 
DEPT  CF  COMPUTING  l INFORMATION  SCIENCES 
. OKLAHOMA  STATE  DIVERSITY,  1970. 

MOOEL  FOR  THE  ANALYSIS  OF  PR OBA& | L I T I ES 
OF  SYSTEMS  (MAPSI.  MBA  RESEARCH  REPORT, 
OKLAHOMA  STATE  UNIVERSITY.  1972. 


COMPUTES  LOG  OF  GAMMA  FUNCTION. 
GENERATES  BETA  OEVIATES. 

CALCULATES  MOOULE  OR  SYSTEM 
RELIABILITY  OR  UNRELIABILITY, 
ecu  PUT  ES  COMPONENT  PRIOR 
DISTRIBUTION  MEAN  RELIABILITIES. 
GENERATES  PROBABILITY  EQUATIONS. 
PRINTS  OUT  PROBABILITY  EQUATIONS. 
GENERATES  10.1)  NORMAL  OEVIATES- 
PRINTS  OUT  SYSTEM  IOE  NT  I F 1C  AT  I ON. 
PRINTS  OUT  FAILURE-HISTORY  DATA  FOR 
COMPONENTS  AFC  PRIOR  MEANS. 

READS  INPUT  DATA. 

COMPUTES  MEAN  COMPONENT  RELIABILITIES 
FRCP*  F At LURE-MtSTORY  OATA. 

GENERATES  UNIFORM  PSEUDOAANOON 
OEVI ATES. 

GENERATES  GAMMA  DEVIATES. 

PERFORMS  *SKai'  SORT. 

COMPUTES  AMO  PRINTS  R ANO  MTBF 
AVERAGES.  VARIANCES  C PERCENTILES. 


FLAG  INDICATING  RELIABILITY  OR 

UNRELIABILITY  COMPUTATION 

BINARY  VECTORS  FOR  MINIMAL  PATH 

SEED  FOR  RAMJOM  NUMBER  GENERATION 

NIT»8ER  OF  COMPONENTS  IN  SVSTEH 

NIP'BE*  OF  MODULES  IN  SYSTEM 

NlP»BE  R OF  MINIMAL  STATES  IN  SYSTEM 

NLHBER  OF  SIMULATIONS  TO  BE  PERFORMED 

SYSTEM  IDENTIFICATION 

MISSION  TIME 

TIME  IP»IT 


•700000470 
•7000004BO 
•70000  0490 
•700000500 
*700000510 
•700000520 
•700000530 
•700000540 
•700000550 
•700000560 
•700000570 

• 700000580 
•700000590 
•700000600 

• 70000C6 | 0 
•700000620 
•700000630 
•700000640 
•700000650 
•700000660 
•700000670 
•7000006*0 
•700000690 
•700000700 
•700000710 

700000720 

700000730 

700000740 
•700000750 
•700000760 
•700000770 
•7000007*0 
•700000790 
•700000800 
•700000B l 0 
•700000*20 
•700000830 
•700000640 
•700000850 
•700000860 
•7000008 70 
•7000008B0 
•700000690 
•700000900 
•700000910 
•7000009  20 
•700000930 
•700000940 
•700000950 
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*1/1  ommiiNc  uwiLEPi 


1N«»I  HOC  OPTIONS  (Ml  IN)  l 


STMT 


/•  INPUT  OAT  A FORM 


- MUST 

SECONO 


*•  SYSTEM  WITKJUT  NODULES  • • 


ocscaipt  ions 


/•  FOURTH 


I - SO 
l * A 

* - u 

U - JO 

1 - 3 

S - 7 

* - 13 

14 


FREE  PORT  AT 


PPEE  FORMAT 


ALPHANUMERIC  SYSTEM  iDENTIf  ICAT  ION. 

NUMBER  qf  MONTE  CARLO  TRIALS. 

SEED  VAtuE  FOR  RANOON  NUMBER 
6ENERATIQN  |«*JST  tE  A NON-EERO 
POSITIVE  INTEGER.  <-  1.0  E*09l.  F OP 
EXAMPLE,  1«79II  . 

SYSTEM  MISSION  TINE  (OPTIONAL!. 

I NLP*  ER  1C  ZERO  DENOTES  NO  nODulFSI. 
NLP4B  £ R OP  COMP  0,£  NTS  IN  S YS  I E M [ N<  l 29 
NUMBER  Of  SYSTEM  MINIMAL  STATES 
IPCZJII. 

P POP  SYSTEM  RELIABILITY.  U FOR 
SYSTEM  UNRELIABILITY. 

MISSION  TI*  UNITS.  ALPHABETIC 
(OPT  ION  AL  I . 

ITENi:  *0*1  FOR  GAMMA  ITINE-TO- 

FA|LJ*El  OR  *1*8  FOR  BETA 
(SUCCESS-FAILURE! . 

ITEM2J  NUMBER  OF  MISSIONS  IGANMAl  01 
SUCCESSES  I BET  A ! . 

ITEMli  NUMBER  OF  FAILURES. 

M MINIMAL  STATES  AS  A STRING  OF 
N-VECTORS  SUCH  AS  'OOUO’B. 
COMPONENTS  IN  IKE  MINIMAL  STATE  ARE 
DENOTED  BY  l.  COMPONENTS  MOT  | V 
MINIMAL  STATE  BY  0. 


COLUMN  0 0000000  3 11  lUH  1 1 222222 2223  3)33333  J 
POSITION  | 23*3*7890123*3*7890121*5*7890123*3*789 

CARO  * ‘10*8  *01*8 

3 * 1'  8 93  . 3. 

♦ *C'«  *9.  1. 


•/000009AD 
•/00000970 
•/00000980 
•/00000990 
p/00001000 
•/00001010 
•/OOOO 1020 
P/00001030 
•/OOOO 10*0 
•/OOOO 1050 
• /00001060 
•/OOOO 1070 

•/ooooioao 

•/OOOO 1090 
•/OOOO  1100 
•/00001110 
•/00001I20 
•/OOOO 1 1 30 
) ■/00001 1*0 
■/OOOO  1130 
•/OOOO 1 160 
•/OOOQll 70 
•/00001 180 
•/00001190 
•/OOOO 1200 
•/OOOO 12 10 
•/00001220 
• /00001 230 
•/OOOO 12*0 
• /OOOO 12  SO 
•/OOOO 1260 
•/OOOO 1 270 
• /OOOO 1210 
•/00001290 
•/OOOO 1300 
• /OOOO 1 310 
•/OOOO 1320 
•/OOOO 1 330 
•/OOOO! 3*0 
•/00001330 
•/OOOO 1 360 
•/OOOO 1370 
•/000013P0 
•/00001390 

• /OOOO 1100 

•/OOOO 14 10 
• /OOOO 1*20 
*/00001*30 
•/OOOOl**0 


PL/I  OPTIMIZING  COMPILER 

STMT 


SPAMCS2I  P*OC  OPT  I CMS  IMAtMII 


0 2 2AHOUR 

100  *327831  100 

TmO  COMPONENT  - TWO  MINIMAL  PATH  SYSTEM 


••  SYSTEM  KITH  MODULES  •• 


• PIPS! 
SECOND 


DC SCRIPT  ION 


ALPHANUMERIC  STSTCM  IDENTIFICATION. 

MlPtBER  OF  MONTE  CARLO  TRIALS. 

SEEO  VALUE  FOR  RANDOM  NUMBFR 
tE  NE  RATI  ON  IMUST  BE  A NON-/ERO 
POSITIVE  I NT  E&  01  , <•  1.0  E*091.  FOR 
EXAMPLE.  23*51*2  . 

SYSTEM  MIS  St  OR  TIME  IOPTIOnAL). 


MlMBER  OF  MODULES  IN  SYSTEM  <*<1291. 
HUMBER  OF  COMPONENTS  IN  SYSTEM. 
NLPlBER  OF  minimal  STATES  IN  SYSTEM 
I J<257! . 

R FOR  SYSTEM  RELIABILITY,  U FOR 
SYSTEM  LP«REl.lA8ILtTY. 

MISSION  TINE  UNITS.  ALPHABETIC 
(OPTIONAL!. 

J SYSTEM  MINIMAL  STATES  AS  A ST» INC 
OF  BINARY  A-VECTORS.  SUCH  AS  *010*8. 
NOOULES  IN  MINIMAL  STATE  At£  OENOTEO 
■Y  1,  MODULES  NOT  IN  MINIMAL  STATE 
BY  0. 

R FOR  MODULE  RELIABILITY.  U FOR 
MODULE  UNRELIABILITY. 

MODULE  lOE'lTIF  ICAYION.  ALPHANUMERIC. 
NUMBER  OF  COMPONENTS  IN  MOGUL  E I N < 1 29 
NUMBER  OF  MINIMAL  STATES  IN  MOOULE 
(M<23T| . 


free  format  itemu  • o*  b for  gammai  ? ime-to- 

FAlLURcl  3»  * 1 • B FOR  BETA 
(SUCCESS  - FAILURE!. 

I TEN2  * NUM6EB  OF  MISSIONS (Cammai  OR 
SUCCESSES! BETA! . 


FREE  FORMAT 


• /OOOO 1*30 
•/OOOO  1**0 

• /OOOO  1*70 
*/00001*80 
•/OOOO 1*90 

• /OOOO  1300 
•/00001310 
•/OOOO 1320 
•/00001530 
•/00001 5*0 
•/OOOO 1330 
•/00001330 
•/OOOO 1370 
•/00331580 

• /OOOO 1590 
•/OOOO 1600 
•/OOOO 1610 

• /OOOO  1*20 

• /OOOO  1630 
•/00001**0 
•/00001650 

• /OOOO  1660 

• /OOOO 16  70 
•/OOOO 1680 
•/OOOO  1690 
•/00001700 
•/OOOO 1710 
•/OOOO  1720 

• /OOOO! 730 
•/OOOO 17*0 

• /OOOO  1730 
•/00001 7*0 
•/OOOO  1770 
•/00001 780 
• /OOOO 1790 
■ /OOOO  1800 
•/OOOO 1810 
•/OOOO 1820 
•/OOOO  1830 
•/3000 1 6*0 

I •/00001850 
•/OOOO  I860 
•/00001  8 tO 
•/00001 880 
•/OOOO 1890 
•/00Q01 900 
•/OOOO 1910 
•/OOOO 1923 
• /OOOO 1930 
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PL7I  OPTIMIZING  COMPILER 


SPARCS2*  P«OC  OPTIONS  IMAlNlt 


I TENS : MJM9E ft  OF  FAILURES.  *700001940 

•700001950 

EVENTM  FREE  FORMAT  N MODULE  MINIMAL  STATES  AS  A ST« IMG  *700001960 

OF  BIN  ART  N-VECTOftS  SUCH  AS  *700001970 

■OHIO'S.  COMPONENTS  IN  MINIMAL  ST  AT  E*/0000  19  80 
Aftf  DENOTED  BY  I,  COMPONENTS  NOT  IN  *700001990 

MINIMAL  STATE  BY  0.  *700002000 

•7000020 10 

THE  FIFTH.  SIXTH.  AMO  SEVENTH  OATA  SETS  AftE  REPEATED  FOR  EACH  *700002020 
MOP  LA  E . */000020  50 

*700002040 

•700Q020S0 

EXAMPLE  *700002060 

•700002070 

•700002080 

COLUMN  0 OOOQOOOO Illlll. 1112222222225)5555533  *700002090 

POSITION  1 23456789  0123456  78901234567B  9012  3456789  *700002100 

• 7 0 OC  0 2110 

CA«0  12  • I0*»  *0 1*9  *700002 120 

II  * 1*8  90.  1.  *700002150 

10  * 0*8  92.  7.  *700002140 

9 ft  8 2 2 *700002150 

8 *01*8  *10*8  *700002140 

7 * O’  6 95.  5.  *700002170 

4 • |*B  99.  1.  *700002160 

5 Li  A 2 2 *700002190 

4 *0*8  *10*8  *700002200 

3 2 2 2*  CYCLE  *700002210 

2 20  256S142  50  * 7 0 0 0 0 2 2 2 0 

1 TMO  NODULES  A NO  TWO  COMPONENTS  SYSTEM  ANALYSIS  *700002250 

•700002240 

•700002250 

•700002260 

'••••**•»•••••«••••••••••••••••••»••••••••••••••••••••••••••••••••• 70000  22  70 

•700002260 

•700002290 

DC L I Al 128  I. 81  I28I.CHELI I28I.STNREL .AVSN. AA  I FLOAT  0ECI6I:  00002500 

DC L (TOT. TCT2.VAC'S0.SYSVEC(L000>. TIME. MOOftEL.STNCftt  FLOAT  OE Cl  4 1 : OOOC251 0 
OCL  INCOM.NNUO.NPATM.NTFAM.StMNUM.J.A.NStftM.N.l .L  ) FIXED  8 1 N I 1 5 » I 3 000 2 1 20 
OC  L COEFHOOOI  FIXED  BIN!  4I.S0EFI  5001  FlXEO  BINI4I;  00002550 

OCL  IIS.IT.NCOMS.NSTAT.NSTAT.N  l FIXED  BINI15I  :00002540 

OCL  IMINPTHI 1281. TEPMSI5500I  » BIT  II2SI  VAR;00002550 

OCL  (SNINPI128  ).STE»"I  5301  I 8ITI12BI  VAA ; 00002360 

OCL  ATYPE  CHAT  (II. TYPE  (1281  SITU). UNIT  CHAR  15 1 . EO 1 0 CHAP  (61;  00002370 
OCL  SYSIO  CHAR  I 79  I , A T Y * CmARIII;  00002380 

OCL  N ARC  FIXES  aiNlllI:  00002390 

OCL ( A 21  28.  1281  .821  28 . 1 23  I . * E LMDO ( 1 28  I . RNOL 1 128  11  FLOAT  OF C 1 6 I :0000 2400 
OCL I NCOMII  1 28  I.MSTI  1281. NTRMl  500 » » FIXEO  8 1 N 1 1 51 ;0 0002410 

OCL  TYPE2I  28.1281  BIT  1 1 I . EO (01 ( 12 ■ 1 CHAR  1 6 I . AT YP It 128)  CHAR | 1 1 00002420 


•01*8  *10*8 
«0’8  95.  5. 

• 1*8  99.  1. 

UA  2 2 

•0*8  *10*8 

2 2 2ft  CYCLE 

20  2365142  50 

TMO  NODULES  A NO  TWO  COMPONENTS  SYSTEM  ANALYSIS 


PL7I  OPTIMUINC  COMPILER 


SPARCS2:  PROC  OPT1CXS  (MAIN!  I 


. TCOF  | 28.128  I FIXEO  8INI4I.  TTANI  28.128  ) 817(1281  VAR!  00002430 
AGNXOM  EWOFILE  ISYS1NI  CO  TO  FINIR:  00Q02V40 

A V S P - 0.;  TOT  • o.;  T0T2  • 0.*  00002450 

EOIO'*SYS  •:  ATYP-*  •;  00002460 

CALL  IhPUTl  (ATTPE. NCON.NNOO.NPATH. SIMMON, SYSIO. TIME. UNIT. NARCI*  00002470 

AA> aahF I MARC  I ; 00002480 

IF  -INmOD-O!  them  CD  TO  MOOULE:  00002490 

CALL  INPUT2  (NCCM.6PATM.TY  PC,  A.  B.MINPTHU  00002500 

CALL  MEANAEL  (MCOM  .A. 8 . TYPE. GAEL  .ATYPEI;  00002510 

CALL  HOLINE  ISYSIO.IP'OO.NCOM.NPATH.  ATYPE.  SINNun  J 00002520 

CALL  Mint*-  INCCH.  A. 8. TYPE  .CREL.EOIO.  ATTPEI  I 00002530 

CALL  COGEN  (COEF.NINPTH.NCOM.MPATH.  N T E»  M . f E A *S I ! /•  EQUATION  DATA  *700002540 
CALL  COPUT  lATYPE.COEF.MINPTH.MCCM.NPATH.NTERM.TERMS.EOlD.MMOD.ATYPI;  00032550 
CALL  COMPUTE  ICAEL .CCEF .NCCN. NT E«N. TERMS .STMRELI ; 00002560 

PUT  F IL  E ( S YSPR  INTI  EDIT  (*SPARCS  t!  StSTEN  SIMULATION  ROUTINE*!  00032570 
IPACE. SHIP (3  I.  A! : 00002560 

IF  ATYPE  - ‘U*  THEN  STrftEL-l.-STMREL;  00002390 

STM CR*  STMR  £L ; 00032600 

PUT  FUEISYSPR  INI  I EDIT  (•  SYSTEM  RELIABILITY  CAlCULATEO  FPON  •.  00002610 

•MEAN  COMPONENT  RELIABILITIES  IS  ’ . ST  NR  EL • * : SYSTEM  *.  00002620 

* LPIREL  IABI  L I TV  IS  ••  I.-STNREL  H SKIPI5I.  A. A, FIB. 6)  .A.A.FI8.6II  ; 00002630 

OO  IS  - I TO  SIPNUM;  7*  OO  SIMULATION  *7  00002640 

CALI  DA TAGEN  I A.8  ,«CN.  TYPE  .CREL  .AT  YPEI  : 00002650 

CALL  CON'UTE  ICAEL  .COEF  .NCOm.NTERM.  terms.  STMREL  • ;/*STM  RELIABILITY  *700002660 
IP  ATYPE  • ‘U1  THEN  ST MREL-l .-STNAEl J 00002670 

SYSVECI  I S) -STMREL  ! 00002680 

AVSP  • AVSN  * STMAEL  / SINMUHI  00002690 

TOT  ■ TOT  • S7PFEL:  00002700 

TOT  J * TOT  2 • STM«EL*STMAEL1  00002710 

(H0,  7*  EHO  SIMULATION  *700002720 

SO  TO  SORT STAT ; 00002730 

/#  *700002740 

7*  SYSTEM  KITH  MODULES  *700002730 

*700002760 

HOOUIC:  tCOMS-NCQM j 00002770 

NSTAT-NP ATM:  00032TBO 

CALL  INPUT!  ISMINP.NSTAT! : 00002790 

CALI  HOLINE  ISYSIO.mmOO.NCON.KPATm. ATYPE.  S1MMUHH  00007800 

CALL  EOGEM  (S3EF.SMIMP.MCDPS.NST AT, MSIAM. STEAM!;  00002810 

CALL  EOPUTI ATYPE .SOfF . 5 MI MP . NC OMS . MSI  A t . MSI  AM . ST E AM , EO I O. MMOO. ATY PI ; 000  328  20 

DO  1*1  BY  1 TO  MMOOI  00002830 

CALL  INPUT4  1NCD4.NST AT.TYPC.A.  A.NINPTH.ATYP, EOIOII  00002840 

00  J-I  TO  XUm;  00002850 

TYPE2IL.JI  - TVPEIJl;  00002860 

A2IL.J)  - All):  00002870 

82IL.JI  - 81 J! I 00002880 

IMOI  7*  MCOM  *7  00002890 

fCOPHL!*NCON;  00002900 

COIOIIL !-€Cl0:  00002910 
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*1/1  OPTIMISING  COMPILE! 


SPARCS2I  PROC  WTIOKS  (HAlNIl 


PACE  • 


»T«T 


TP 

■0 


11 
• 2 
I) 

■ 4 

■ » 

• 4 
IT 

• I 
I* 
IQ 
*1 

12 
IS 
*4 
IS 
14 
11 
II 
II 

100 

101 

102 

I0S 

104 

103 


A TV  PI  ILI  • ATVPt 
M ST  < L I - * ST*  T J 

CALL  EQCEN  ICOEF.MtNPTH.NCOH.NSTAT.NTf AN.TERmSI  l 
NTlMItlaNrEftNi 
DO  l-l  TO  NTfAK; 

TCOFll.HI-COEFCMI  j 
TTItKU.NI  -Tf  c«SI  "l: 

E NO  I /•  NTERM  «/ 

CALL  EOHjMATYPE.CQEF.NlNP  TM.  NCON.  N ST  AT.  N TE  AM  . TE  RMS  .EOI  0 .NNOD  , ATYPI  ; 
CALL  NEANML  {NCON.A.B.TYPE.CREL.ATVPl: 

CALL  CONFUTE  ICAEL.COCF.XOM.mTERM.  TERMS.  NOULIII 
1 1 ATT  PC-  * I • t AT  YP-  • U*  T«»  AHOLIll-l.—  RNOL  III: 

|*  ATYPE  ■ *U*  t ATYP-'A’  fl-EN  *«L(l>«l.-MOllUl 
CALL  HIS  INF  (NCON. A. 6, TYPE ,C*El .EOIO. ATYPI; 

*ND«  /•  NCON  •/ 

PUT  FILE! SYSP* tNlI  SKIPC5I: 

CALL  CCPIPUTE  (RMOL.SOEF.aCOHS.NSTAM.  STERN. STMRELI: 

PUT  FILE  (SYSPRlNTI  EDIT  I'SPARCS  «S  SYSTEM  SIMULATE  ROUT  INE  '» 
(PACE.SXIPIJI.AI: 

I*  At  VP  E “ • J • THEN  STnAEL- l.-STNREL S 
STmcr-stmel: 

PUT  FILEISYSP*  INTI  EDIT  I • SYSTEN  RELIABILITY  CALCULATED  FIW  • 
•MEAN  COMPONENT  RELIABILITIES  IS  * • S TKR  El,';  SYSTEM  •, 

• LHRE  L I ABlLl  TY  IS  • « l.-STNR  £L > I SR  IP  IS >.  A,  A.F I B.4) . A. A. F| ».* 1 1 
00  IS*  1 TO  SMNVP<; 

OC  **M  TC  NNOOl 
ncon-nCOni  in)  : 

DO  J-l  TO  ncCn: 

A I J I - AZIN. Jit 
II J) >121  N.J); 

TYPEUI-TYPC2IK,  Jit 
(NO:  /•  NCON  •/ 

CALL  OATACEN  I A .6 . NC OM . TYPE .CftEL . AT YPI I Mil  i 
00  N-  | TO  NT  BNI  HI  I 

C OC  F I n I - TCOFIN.NI; 

TERNSINI-T  TRAIN. N|  J 
ELOl  /•  NTRMINI  •/ 

CALL  CONPUTE  CCREL.CCEF.NCCN.NT  RM(N  I.TERNS.NOOREl  It 
IF  ATYPE-'U*  t A T VP  l INI  - *R  • THEN  NOOREL-i.-NOORELt 
IF  ATY  PE  -•  R • l ATVPI  «N)»*U*  THEN  MOOR  EL  • l .- MOOR  El  t 
RELMQOINI  • NOOREL: 

ENO;  /•  woo  • / 

CALL  COMPUTE  IRELNOO. SCAF.iCCHS.nSTPn. STERN.  STNREDl 
|F  ATYPE  • *U*  THEN  STNRE  L-E.-STMREl; 

SVSVECI  ISI-STNREL  S 
A VSP  • A VS  M * STNRtL  / SINNUn; 

TOT  - TOT  * StNREi: 

T0T2  • TOT2  * STHREL*STNRCL  I 

|NOt  /•  PNO  SINJLATION  NJTH  MODULES 


00002120 
000021  >0 
00002140 
00002130 
00002160 
00002170 
00002IBO 
00002910 
OOOOIOOO 
00003010 
0000)020 
000030)0 
0000  30  40 
00003050 
00003040 
0000)070 
0000)0*0 
00003090 
00003100 
00003110 
00003120 
000031)0 
00003140 
00003150 
00003140 
00003170 
0000)110 
00003190 
0000)200 
00003210 
00003220 
0000)230 
0000)240 
0000)250 
0000)260 
00003270 
00003210 
00003290 
00003300 
0000)310 
00003320 
000031)0 
0000)340 
0000)330 
00003)60 
0000)370 
000033*0 
00003390 
■/OOOO  3400 


PL/I  OPT  I P 12  INC  COMPILER 

STHT 


SPAACS2:  PROC  OPTtOlS  (NAINlt 


104 

ICT 

101 

101 


110 


111 

117 

113 

114 

113 

114 

U1 

111 

111 

120 

121 


122 


123 

124 
123 
12A 


SORTSTATt 

CALL  SORT  IS IHMJN. SVSVECI : 

CALL  STATC  SI NNUN.SVSVEC .AVSN.AtvPE.TlNE.UNlT. TOT  .TOT  2. ST  NCR  I | 
PUT  F ILEISYSPR  INT I PACE: 

CO  TO  acn: 


INPUTII  PROC  IATVP6.NC0N 


PATH.S  INNJN.  SY  SIO.T I ME ,UNl T.NAXCI t 


0000)410 
00003420 
00001430 
0000)440 
00003450 
•/OOOO  3460 
•/000034T0 
0000)480 


the  oata  for  the  system 

/•  ATYPE  - ANALYSIS  TYPE  (RELIABILITY  FOR  «.  ^RELIABILITY  FOR  Ul 
/•  N ARC  - SEED  F 3 R RANOON  NUMBER  GENERATION 
/•  NCON  - NUMBER  C/  COMPONENTS  IN  SYSTEM. 

/•  NMOO  - N LPA8E  R CF  NOOulES  IN  SVSTEN. 

/•  NPATH  - NUMBER  CF  SYSTEN  MINIMAL  STATES. 

/•  SINNUN  - NUMBER  OF  SIMULATION  OES  |R  EO 

/•  SYS  1 0 - SYSTEM  IOENTIF)  CATION. 

/■  TIME  - MISSION  TIME 

/•  (PI  I T - THE  UNIT  OF  TIME  MEASUREMENT. 


• • /OOO  0 3490 

• /OOOO  3300 

• /OOOO  3510 
•/OOOO  3320 
• /OOOO  3330 
•/00003540 
•/00001350 
•/00003560 
•/00003570 

• /OOOO  3580 
•/00003530 

• /OOOO  3600 


OCL  I NCON. NMOO.NP ATH.S  INNUN 
OCL  inarg 
OCL  ITIME 

OCL  ATYPE  CHAR  I • I .UNI  T ChARIOj 
OCL  5YSI0  Chari  •) ; 

ACT  FILE  ISYSINI  EO 
CCT  FILE  ISYSINI  EO 
ICOL 

ACT  FILE  ISYSINI  LI 
«T  FILE  ISYSINI  EO 
• ETlpn: 

ENO  1NPUT1: 


IT  (STS10I  ICOL  I I I . At  791  I ! /•  RE  AO  CARD  I 

IT  (SIMNJM.NARG.T IME) 
ll.F|4l.lll).FI9).lltl.F(4l)t 
ST  INNO3.NC0M.NPATH I;  /-NEXT  2 READ  C 
IT  (ATYPE. UNIT)  I CO 1 1 1 4 I . A I 1 1 . At  5 1 ) ; 


I NPuT  2 t PROC  I NCON. NPATH, T YPE . A. 8.N |NPTH|  ; 


/•  this  input  j procedure  re 

/•  AND  MINIMAL  STATES  IN 
/•  OF  SYSTEN  RELIABILITY 
/•  TYPE  I •!  - TYPE  CF  C0NP0 

/•  A I • l - NUMBER  CF  OBS 

/•  61*1  - NIP'S  * R Of  OBS 

/•  MINPTHI«|-  MINIMAL  STATE 


AOS  IK  THE  HISTORICAL  OAT. 


••••••••••••••• /OOOO 36 10 

I FIXED  B IN  1 1 51 (OOOO 36  2 0 
I FIXED  B IN (SI  I 10000)6)0 
I FLOAT  0ECI6I:  00003640 
0000)630 
00003660 
/00003670 
00003680 
00003690 
D 3*  /00003700 
0000)710 
00003720 
00003730 
•/00003740 
•/00003750 
. 0000)760 

••••/OOOO  3770 

FOR  COMPONENTS  "/O  000  3 780 


MARY  REPRESENTATION  FOR  THE  COMPUTATION 
IHCRJT  MODULES. 

nENT  (SEE  OATaCEn  PROCEOUREI. 

E* V E 0 SUCCESSES  ISEE  PORT  IN  OATACEN). 
FRVEO  FAILURES  ISEE  FAIL  IN  OATACfN). 

S IN  BINARY  REPRESENT4T ION. 


OCL  ( NCOM.  NP A TH.I 
OCL  IAI-I.EI-1 

oil  ninptmi*)  air 

GET  FlL  El  STSINI 


/00003790 
/OOOO  3800 
/0  900  38 1 O 
/OOOO  3820 
/000038  30 
/OOOO  3840 

•••••••••••••••-••••••-••-•••••••••• •••••■■/00003850 

I FI*  CO  B IN 1 13  I :0000  3860 
) FLOAT  OEC  (61:0000)870 
VAR  . TYPE!*)  B I T ( • | 1 0.0003880 

II TVPEI I I .A( I ) .81  I I 00  l-l  TO  NCOMII:  00003890 
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PL7 1 tfiimiiic  COMPILER 


STi«CUi  WOC  OP  T | os  |N*  I Ml  { 


PACE  10 


GET  MU  1ST  S IN  I LIST  KNlMPTHtll  00  I-l  TQ  HR  ATM  I 1 1 

tcruiNt 

INO  JNPUT2; 

/• 

7* 

INPUT]  t PROC  (SMIMP.NSTAT) | 

/•  INPUTS  READ  IN  THE  MINIMAL  STATES  ISKINPI  FCO  SYSTEM  UNICM  MILL 
/•  HAVE  THE  MOOULES  in  IT. 

/«•••*«• 

OCL  SNINPI*)  ftlT(p)  VAR.  MSTAT  FIXED  BtNllSI; 

DCL  (1  I FIXED  BIN 

GET  PILE  ISYS1NI  LIST  (ISMlNPdl  OQ  I-l  TO  NSTAT1): 

K(T(HNI 

END:  /»  INPUT)  •/ 

/* 

/• 

INPUT**  pnoc  INCON. STATES. TTPE. A. B. NINPTh. ATTP.EQIOI t 



/•  tpe  Input  a procedure  reads  in  the  data  for  the  mqoule 

f IDENT  IF  It  A TI CN. 

/•  ATYP  - ANALYSIS  TYPE  (RELIABILITY  FOR  R.  UNRELIABILITY  FOR  U) 

/•  EO 1 0 - NODULE  IDENTIFICATION 

/•  NCOM  - MUNBER  CF  COMPONENTS  IN  SYSTEM. 

/•  STATES  - NUMBER  OF  SYSTEM  MINIMAL  STATES. 

/•«*•!«•  mm  .........  . •. .................................. ....... . .. 

OCL  (NCQP. STATES)  FIXED  6INI15I.  IA|*I.S(*)I  FLOAT  DECIAl; 

OCL  MtNPTHI*!  A I T t • | VAR.  EQIO  CHAR  | • | » ATYP  CHARI*),  TYPE!*) 
BIT  I«|  ; 

GET  FILE  I SY SI  Ml  EOIT  IATYP.E0I0I  (COL III . A( 1 1 . A 16 ) ) : 

GET  FILE  I SYS  In)  LIST  INCCN. STATES) : 

GET  FILE  I SY  SIN)  LIST  < I TY  PE  < I ) . At  I I . B(  I)  DO  I-l  TQ  NCONDS 
GET  FILE  I SYS!  N)  LIST  URInpTh(I)  00  1-1  TO  STATES)): 

• ETUin; 

ENO:  /•  INPUT*  •/ 


NEAWIEI*  PROC  INCCP.A.b.TTPE.  AC*.  ATVIl 


/•  A COMfUTATlON  PROCEDURE  FOR  THE  MEAN  RELIABILITY  OF  COMPONENT 
/»  BASED  UPON  THE  HISTORICAL  DATA  OF  EACH  CCMPCNENT  RELIABILITY. 



OCL  INCOM.  I)  FIXED  BINDS).  I A(  • ) . B I •)  . ACA  (•)  I FLOAT  DECIAl, 
TYPE!*)  BI 11*1, ATT  CHARI*): 

DO  1*1  TO  ICON; 

IF  TYPE! Il-*l* B THEN  ACR(t|-(A(l).t.)/(A|  II.BI I>»2.|; 

ELSE  ACRII  I * 1 1 A 1 1 1*1)  /(At  II.2.II—  I *111*1.1: 
IF  ATT  • *U  * THEN  ACRII)  - I.  - ACRID! 

END) 


0000)000 
0000)010 
0000)020 
•70000)0)0 
•70000  31 AD 
0003)050 
*•••70000)960 
•70000  39  TO 
*700003910 
••••70000)990 
OOOOAOOO 
1151:0000*010 
000  0*020 
0000*030 
0000*0*0 
•70000 AO SO 
•70000*060 
0000*070 
••••70  000*080 
•70300*090 
•70000*100 
•70000*110 
•70000*120 
•70000*130 
•70000*1*0 
••••70000*150 
0000*160 
0000*170 
0000*180 
0000*190 
0000*200 
0000*210 
0000*220 
0000*2)0 
0000*2*0 
•70000*250 
•70000*260 
0000*270 
1 ••••70000 *2B0 
•70000*290 
•70000*300 
'•**•70003*310 
0000*320 
0000*3)0 
0000*3*0 
0000*350 
0000*160 
0000*370 
0000*380 


PL 7 I OPTIMIZING  COMPILER 


SP 1RCS2 > PROC  OPTIONS  (MAIN); 


MOL  1 HEX  PROC  I STS  10.  NNOD.  NCOM.  NPATH.  ATYPE  , S ImNUMI  ; 


/•  PRINT  OUT  THE  MAJOR  HEADINGS  FOR  RET  VARIABLES  *N0  SYSTEM  10. 

/••••«..  •••••.  a.  .................... 

DCL  SYStO  CHAR  I •>  « AT  TPE  CHAR  !•).  STA  CHARI5I  VAR; 

OCL  INCON.  M400. NPaTm. SIMNUM.NC  I FIXED  BIN 

IF  ATYPE *•  R*  THEN  STA-'PATNS'; 

ELSE  STA-'CUTS  *1 

PUT  FILEISYSPR  INT | EDIT  !••  S P * R C S ••) 

(PAGE, A)  | • S I HJL  AT  ION  PROGRAM  FOR  THE  ANALYSIS  OF  THE  •, 
■RELIABILITY  OF  CO**LEX  SYSTEMS*)  I SK  I PI  1 1 . A.  A)  CSYSTEN 
• IDE  NT  IF IC AT  ION*. SYS  ID)  I SX IP  I 5 ) . A. A. XI 1 3 1 . A I 
('NUMBER  GF  SIMULATIONS  '.SIMNJM)  < S K I P < 1 I . A. X 1 1 * > , F I 3 > I 
(•NUMBER  OF  NOOULES  * .NmOOI  I SKI  P 1 1 1 . A.  xl  1 71  , F 1 3)1 
(•NUMBER  OF  COMPONENTS  *.NCOM)  IS  R I P I 1 1 . A,  XI  l*  ).  F ( 31  I 

I 'NUMBER  OF  MINIMAL  *. STA. NPATH!  IS K I P 1 1 > . A. A, X 1 12 ) . F 1 3 
IF  ATYPE  - *R  • (HEN  DO! 

PUT  FILEISY SPRINT | EDIT  ('TYPE  OF  AN ALY SI S • , *R EL  I AB |L IT V • I 
(SKIPIl) .A.XI21 I . Ai; 

END  I 
ELSE  DO: 

PUT  FILE  (SVSPA  INT  ) EOIT  1 • TYPE  OF  ANA  LYSI  S*  . • UNRCL  I ABI  L t TY*  ) 
(SR (Pill. A. XI  21 1. A|| 

END: 

RET  IP  NX 

ENO!  7*  HOLINE  «7 


HlSlNFt  PROC  (NCOM.A.B.TYPE.  ACR.COIO. ATYPE) X 


0000*390 

0000**00 

•70000*410 

•700004*20 

0000**30 

•.••70000***0 

•70000**50 

••••70000***0 

0000**70 

lisi:oooov*ao 

0000**90 
0000*500 
0000*510 
0000*520 
*,  0000*5)0 

0000*5*0 
0000*550 
0000*560 
0000*570 
II)  0000*580 
0030*590 
0000*600 
0000*610 
0000*620 
0000*630 
0000*6*0 
0000*650 
0000*660 
0000*670 
0000*660 
•70000*690 
•70000*700 
0000*710 


7*  PROCECURE  H1SIVF  PRINTS  THE  HISTORICAL  INFORMATIONS  FOR  E AC*  •70000*730 

/»  COMPONENT  EITHER  IN  A SYSTEM  OR  IN  NOOULES-  *70000*7*0 

/•••••••  ••••*••  •••••.».••.  .M  ••.....  ..........  .•••••••••••••••..  ..  mm  •■70000*750 

OCL  ATYPE  CHARI*);  0000*760 

DCL  «*(•»  .||.|  .ACRID  | FLOAT  0ECI6I:  0000*770 

OCL  TYPE  I • I BI  T € • | , EG  I O CHAR  1*1.10  CM AR ( 1 ))  |N|T  !••)  VAR:  0000*780 

OCL  INCOM.  K.  ) FIXED  BIN  U5»  10000*790 

IF  EOIO  • *SYS  • THEN  ID-*SYSTEM*;  0000*800 

ELSE  1 0“ * MOO  ULC  •IIEOIO:  0000*810 

PUT  FILEISYSPR I NT  I EOIT  ('HISTORICAL  INFORMATION  F OR  EACH  •,  0000*820 

•COMPONENT  IN  • .IOIISaIPISI  .A. A. A)  ( • COMPONENT  • , • TYPE  *.0000*830 

•SUCCESS  (BETA]'.'  FAILlPtS  ‘.'PRIOR  01 STRIBUT ION' 1 0000*8*0 

ISMP(2I.A.X(7>.A.XII3I.A.XI7|.a.  XI 61. A)  0000*B50 

(•Equivalent  missionsigammai  • .'mean*  i i s*  ip  ( 1 1 .colds  l . a.  oooogbao 

1126). AI!  0 OOO*  B T 0 
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FL/1  OPTIMIZING  COIOIKI 


SPAACS2:  f*Ot  QPTICWS  IMA  INIs 


PIU  12 


17* 

177 

IT  8 
IT* 

1*0 

1*1 

t«2 

lai 

184 

It) 

IS  4 
1ST 

IBS 

IBS 


ISO 

IS) 

1«2 

1*1 

ISA 

1*5 

1S4 

1*7 


|F  ATYPE  • THEN  DO  I 

DO  NC-  1 TO  NCOS  ; 

if  type  inci-*  i *8  then  oo; 

PUT  Flit! SYSPA INTI  EDIT  1 NC . • AT T*t BUT  E 1 BET  A I • , A I NC I . BINC) . ACR INC J 
I SA I FI  21,* 1)1 .Fill .XI  71 .A , XI 121 ,F l*.2> .11 151 ,FI 5.21  .*1 15)  * 
FIB.  5)1;  END: 

ELSE  00; 

FUT  F ILCISTSFA JNT I EDIT  l NC . • T t M(- TO- F A IL  L*E I GANNA  I ■ . A | NC  » . 91  1C  I . 
AC*  ( NC  I I [SX|P{2I.XI3l.M3l.xm.A,Xf*I.FIS,2J.Xil5i.FI5.  21. 
XIISI.FI  b.  511 1 e>o: 

ENO: 

eno: 

ELSE  001 

DO  NC-t  TC  nccm; 

IF  TTFEInCI-'I **  THEN  DO: 

FUT  FILE!  SYSPA  INTI  EDIT  I NC  . ' AT  TN  I BUTE  I BE  TA  I • . A | NCI  .Bl  NCI  . 

I .-ACA INC  l» 

I SKI  FI  21 .1111 .FIJI  .1171 .A.XI12I ,F |S.2  I. XI 151. FIS. 21. 1(151. 
FIS. Bill  ENOS 

ELSE  DO: 

FUT  F ILE  I SYSPA  INTI  EDIT  I NC  , • Tl  MC-T£>-  FA  1 L USE  I CANS  Al  • , A I NC  I . Bl  NC  I . 
1. -ACA  INC  II  I SA  I PI  21.  XI  SI.F  111  .XI  Tl  .A.  XI  91. FIS. 21  . XI  1 5 I »f  I 5 . 21  . 
xll9l.Fts.4lt:  (NO: 

ENO: 

Eno: 

RCTLftN: 

ENO:  /-MlSINF*/ 


/• 

/» 

COGEN: PAOC  ICQEF  .MJNPTH.NC ON . NFATN.NTEXN  , TEAMS  I S 

f .......  M • ■ ..  ........  ...............  ....  .......... — . . . ..  ...... 

f TIE  FACSABItITY  EQUATIONS  ARE  ENTIRELY  CENEAATEO  IN  THIS  CO  CE  N 

/•  FAOC€CU«E  USING  FOINCAAE-S  NETNOO  I I NC  L US  I ON-f  XC  LUSl  ONI  . FOR  A 
/»  SYSTEP  HAVING  N MINIMAL  STATES.  THE  PROBABILITY  EQUATION  HAS  A 
/•  HAX1MI*  OF  2”N-t  TEAMS.  HOnEVEA.  Tm£  EQUATION  GENEAATEO  BY  EQCEN 
/•  HAS  CNl  Y A FRACTION  OF  T ►«  MAXIMUM  NUMBER  JF  TEAMS.  BECAUSE  OF. 

/*  CANCEUATICN  OF  DUPLICATE  TEAMS.  AFTE*  EACH  MINIMAL  STATE  IS 
/•  INTRODUCED  AND  CCPBINO  WITH  THE  PREVIOUSLY  GENEAATEO  TEAMS 
/•  TO  FOAM  FOSStBLE  Nf  4 I E » MS  THE  ACCUMULATION  F*OCESS  IS  P£*FOA>CO. 
/.  TEAMS  THAT  HAVE  ZE  AO  COEFFICINNTS  AAE  A EMOV  ED  B EFO*  E THE  NEXT 
/•  MINIMAL  STATE  IS  INTRODUCED. 

/• 


1** 

200 

201 

202 


r*  VARIABLES: 

/• 




DC  L COEF  1*1  FIXED  flJNl  All 
CCL  MINFTH  |«|  BIT  I • 1 VAA; 

DC  L I II.  12.  0.14.  IS.  U.  IT.AAI.XDUP.NSUt.N3uP.  1NC2IF1XED  BIN  t HI 
OCL  INCOH.  4PATH.NTEAM  I FIXED  BlNUSI 


OOOOABBO 

0000*8*0 

00004*00 

100004*10 

00004*20 

00004430 

00004*40 

00004*50 

00004*40 

00004*70 

oooo4*ao 

00004*90 
00005000 
00005010 
00009020 
00005030 
00005040 
OOOOSOSO 
00009040 
00005070 
00005CBO 
000090*0 
00005100 
00005110 
00005120 
00009130 
00005140 
/O 0005150 
/000051 40 
00009170 
✓000051 80 
/00005 1*0 
/00005200 
/OO  00  5 2 1 0 
/00005220 
/00005230 
/00005240 
/OOOO  5250 
/O 0005260 
/OOOO  52  70 
/000052BO 
2000052*0 
/00005300 
/00005310 
/OOOOS320 
00005330 
00005340 
; 00005350 
100005360 


Ft/I  OPTIMIZING  COPILE* 


SP  ARCS  2 1 FROC  DFTICFlS  IMAINII 


FACE  II 


STMT 


201 

204 

204 

207 

210 

212 

211 

214 

215 

214 
217 

215 
21* 
220 
221 
222 
221 
224 
22  5 
224 
22T 
22  S 
22* 

230 

231 
292 
231 
294 
219 
234 
237 
23B 
23* 

240 

241 

242 
249 
244 

249 
244 
247 
241 
24* 

250 

251 
292 
253 
294 
299 


SUB: 


FNDI4I 

don  i 


x Sub  i 
C NO  16  1 


OCL  TERMS  1*1  BIT  I *1  VAR { 

TERMSIt  I «MI  M*r  h 1 1 1 ; COE  F ( 1 1 . 1 : /•  1ST  3 TERNS  OF  FR3B  . E OUA  . 
|F  NPATM.I  IHCM  00: 

NTERM-i:  return:  eno: 

TERMSI21-M1  4PTHIZI;  C0EFC2I-1; 

TERMS!  31-MI  NPTHI  11  | M1MPTMI21J 

COEFI3I  — l: 

6TCRM.3I 

IF  NPATl^Z  THEN  CO  TO  E NOE  0 : 

6 SUB-4; 

OO  11  • ) 10  NPATHS  /•  OG  LOOFl.  REMAINING  TERMS 

TERMS! N SUB  I -Ml NPTHI  111  : 

COEF (NSUB I- I : 

NSUB -NSUB* I l 

00  12  - 1 TO  NTERNS  /•  00  LOOP2  •/ 

TERMSINSUBI -MINPTHI  ill  | TERMS  1121. 

CDEFINSU8I--C0EFI 1211  /•  OETE * NINE  COEFFICIENT 

ASUft- NSUB- t ; 


ENO;  /•  ENO  L OOP 2 •/ 

M)UP-0:  /•  ACCLPAALATE  DUPLICATE  TERMS 

INC2-NSUB-1  S 

OO  I 3-N  IE  RM  ♦?  TO  INC2: 

CO  14-3  TO  13-  1-NOUP: 

IF  TEAMSI  14  I—  TERMS  ItS-NOuPI  THEN  CO  TO  ENOI4; 

COEFI  I4I-C0EFI  141  . COEFI | 3-NOUPI ; 

IF  IJ-NOUP-  NSuB-  I THEN  GO  TO  SUB: 

OO  15-13-NOuP  TO  INC2-1-NCUP: 

TERMSI  1 51  •TEAM  SI  I 5-11  : 

COEFI 151- COEF I 19*11$ 

ENO: 

NSUB-NSUB- I : 

M)UP"N0UP-»1  : 

GO  TO  E W)l  31 
B<0: 

End* 

ADUP-O:  /•  REMOVE  TERMS  WITH  ZE  *0  COEFFICIENTS  •/ 


XAl-NSUB-l  : 

CD  16-3  TO  AX  1 : 

IF  COEF  116- AOUPI-.-0  T N CO  TO  END  16 1 
IF  16-KDuP-NSUB-I  THEN  CO  TO  ASUB; 

DO  IT-I4-ADUP  IQ  XAi-l-XOUP: 
TERMSI  I Tl  -TEAMSI  I T*H  : 

COEFI  I Tl-COEFI  17*11  S 


eno: 


NSUS-NSLB- L I 
ROUP -ROUP  *1  l 


(no: 

mteam-nsub-  i: 

ENO  I /•  IK)  LOOPI  •/ 


00005370 
•/OOOOS3BO 
000053*0 
00005400 
00005410 
00005420 
00005430 
00005440 
00005450 
00005460 
•/00005470 
000054B0 
000054*0 
00005500 
00005510 
000055ZO 
• /OOOO  55  30 
00005540 
00005550 
•/00005560 
00005570 
OOOOS5BO 
000055*0 
00005600 
00005610 
00005620 
00005630 
00005640 
00005650 
00005660 
000056TQ 
000056*0 
000096*0 
00005700 
00005710 
00005720 
00005730 
00005740 
00005750 
00005740 
00005770 
000057BO 
000057*0 
OOOOSBOO 
00005810 
00005820 
00005B30 
00005B40 
00009150 
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*1/1  OPTIMIZING  CONlLtl 


SPARCS2*  WOC  OPT  I OS  IMAINIJ 


WC( 


14 


STMT 


254 


257 


23S 
254 
2*0 
24  t 
2*2 

2*5 


2*4 

2*3 


24* 

247 

240 

2*4 

270 

274 

213 

27* 


ENDEQ:  EM)  EOGENi  000051*0 

/«  4/00005170 

/•  4/00005110 

EQPUT:  WOC  <8TVPE.CGEF.MINPTH.NC0N.NPATH,NTERM, TERMS. £010. SHOO.  ATYF  I J 00005140 

000  59  00 

/*  PUNT  OUT  THE  STSTEM  REL  IAS  1 1 ! TV  EOUAUCX  61  USING  THE  BINARY  4/00005910 

/•  VECTOR  TEAMS!*)  A*©  COEFFICIENT  OF  COEF !* ) FROM  THE  FUNCTION  4/00005920 

/•  PROCEDURE  EOGEN.  4/00005930 

— / 0 0005940 

OIL  IR4.RS.K6.R7.LEN. LENA. ICON, NNtN.NIERN.NPATM.NNI  FIXEO  0 I N 1 15  I ;3 000 59 50 
OCL  SIGN  CMRR(l)  VAR.  STATE  CHARI  5)  VAA.NMOO  FIXED  1INI  15):  00005960 

OCL  ICHARI.CHAR2.MINP  I CHAM120I  VARJ00005470 

OCL  M|HPTH!«I  B I T | • 1 VAR,  TERMS  <•!  BIT  1*1  VAR:  000059)0 

OCL  COEF  <•»  FIXEO  BIN!  41.  ATVPE  CHARI. I.EOID  CMARI-I.ATVP  00005990 

CHAM*):  00006000 

OCL  ROMPS!  121)  CHARI  31  VARYING  | Nl TI Alt  * t ' 2* » '3* • 00006010 

44»,4S4.'**.47*  .'!•  .*9* .‘10*. *11'. '12'. '13*. 'I  4'. '15*.  'I*',  0000*020 

4 l?4.4 18*. *19*. *20*  .'21'  .*22*  . • 23  • ,'24’  ,'25*  .•26*  ,'27'.  00006030 

•28  • . *29  •. *30*. *31 • .• 32*. *33*. • 34* . ■ 35* , *36* .*  37*  , ‘SB*  . 0000*040 

•39*  .*404.*41* .*42  4 .'43* .*44‘. *45*. • 46 • .•47* . • *1*,  ,49*.  00006050 

•50*.*3L*. *52* ,*33* .*54* . • 35' . • 56* . » 57* , * 5 1* .*  59*  .'60* . 00006040 

4*I4.»*2*. *43*. '*4*  .*6  5'.  '66'.  '67'.  '6fl*  ,'*9* ,•  70* .*71*  • 000060  70 

*72 *.•73  ,.*74*. 4 75*  76* .*  7 ?• . • 71* . • 79*  .•SO* .' 11  * . *82  • , 0 0006010 

'*S4.484,.485,.,6*».»«7,.,8  8*.'»9,,'9  0*,*9I',*92*.,93*.  0000  6090 

*44 • .495*.a9*a i *97*  .*91 • . *9  9* . • 100* , • 10 l* • *102*. * 103* . 00006100 

» 104*.  4 1C3*.4  106*  .*  107*  ••LOS*  .*109*  . * l 10  • . 'Ill  *,,112*.  00006110 

4 1 13*. *1 14*. 4 113*. 4»16*. 41174, *111* , • 119* . • 120*,* 121* . 00006120 

•122*. 41234. *124*. *|2$*. *126*. *I27». *128*1  STATIC:  0000*130 

OCL  CO  CHAR  111.  Cl  CHAR  121*  C2  CHAR(3>.  C3  Chart*!:  0000*140 

(XL  MOOSVI  1211  ChAR  (3)  VARYING  I NI  Tl  * A • , * 8 * . *C  * . 0000*150 

*0* .*C4 «,F4.*G*»4M'  «*I*.*J,.*R*»*L4,*M'.*M*.*0*.,P*,*0*.  \ 0000*1*0 

*R  *.»S4.  *T4,4U4 ,*V* ,*M* ,'X* ,* Y* ,*Z* . * Al*  .»  81* . *Cl • .*01* . 0000*170 

*E14.,F1*»,G1,»*H1*»*114. *J  1*. *K1*,*L1'«*M1* . * Nl*  . *01* • 0000*180 

*Pl*.40l4.*Rl*  «*S1*  ,*T1* .*01* .* VI*  ,*Nt * .*Xl* ,* Yl* . *21*.  00006190 

4A2*.,62*.  *C2*.  *02*  . *E  2 * . • F 2*  . • C2  • . ■ H2*  .*12*  ,*  J2  • .*R2*  * 00006200 

4t2* .*M2  ,.,N2*. *02* .*P2* .*02*. *R2*. • 5 2* . * T 2* . * U2*  , *V2*.  00006210 

*U2*.4X2'.  • Y2*. *Z2*  ,*»3* .*8  3* .*C3*  ,*03* .*E3* ,*F3*,*C3*  • 00006220 

•MJ*,4I34,4j3*.  'R3*.*L3*.  *M3*.  *NJ*.*03*.  * P J*  . • 03*  .*R3*  , 00006230 

4 S3* T34.»U34 .*V3* .*N3* .»«3*.*Y1». *23». *A4*.  • 84*.  *C4».  00006240 

*04* . 4E4», *F  4* • *G4* •*M4» ,4I  4* •• J4* .*  R4*  ,*  L4* ,*  M4*  . 'N44  , 0000  6250 

*04  *,,P4,,*04*. •R4*.*S4,,*T4*» • 04* . • V** • »N4* , • X4*  I STATIC:  0000  6260 

IF  EOIO  - 'SYS  * THEN  DO:  00006270 

IF  ATVPE  - *R4  THEN  DO:  00006280 

IF  NPATtwl  THEN  STATE -'PATH  4;  00006240 

ELSE  STATE-*  t »T  MS  • ; 00006300 

CO— RM  Cl-  • A 4»  C2-  * R »l  C3— « 4I  0000*310 

End:  0000*320 

ELSE  00:  0000*3)0 

IF  NPATM-l  THEN  STATE— CUT  4;  0000*340 


PL/I  OPTIMIZING  CO*P!LE«  SPARCS21  PROC  OPTIONS  IMAlNU 


PAGE  15 


STMT 


277 

278 
282 
283 


284 

285 
28* 

287 

288 
289 
291 

294 

295 
24* 
297 

301 

302 

303 


304 


303 

30* 

307 

3CB 

309 

310 

311 
112 

313 

314 

315 
31* 

317 

318 

319 

320 

321 

322 

323 

324 
323 
328 
32  7 
328 


4 I C3-*  U * J 
s EQUATION  GENERATION  ROUTINE 


ELSE  ST  AT  E-  'CUTS 

co-*u* : ci-*o  »* 

end: 

PUT  F I LE  I SYSPR I NT  I EDIT  I'SPARCS 
(PAGE.SRlPI3l.Al: 

END: 

ELSE  001 

IF  *TYP  - * A * THEN  00 X 

IF  NPATH-1  THEN  STATE -'PATH  * 

ELSE  state-*p»t»«*: 

co—  ci- •*  *s  C2-* n •;  cj 


IF  NPATM-t  THEN  STATE  — CUT  •* 

ELSE  ST  ATE- 'CUTS  •: 

co-*u'x  ci-'u  •:  C2—  u •:  C3-*u  •» 

end  : 
t*o: 

IF  -MIOIO-'SYS  'I  then  PUT  f ILEISYSPRINTI  EDIT  ('THE  • # NP  AT  N» 
• MINIMAL  '.STATE.*  FOR  'NODULE  « ,E0 1 Dl  I SR  I PI  31  . A ,F  I 31  . 

8. A. A. A. A):  ELSE 

PUT  FILE  ISYSPRJNTI  EOITC'TH?  • ,NPA  TH MINIMAL  '.STATE.'  FOR' 
.'  SYSTEM  »1  ISX1PI3I.A.FI 3I.A.A.A.A.SRIPI2I): 

PUT  FILEISYSPRINTI  5RIPI2U 
L5SOO  K4— 1 TO  NP  A Tm | 

MINF-"  : 

N I N P—  • < ' I 

L*: DO  R3-1  TO  NCCiM;  /•  OUTPUT  FOR  MINIMAL  STATES  •/ 

IF  SUBSTR(MlNPTM|R4I.R5.1l-'l'B  Them 

IF  EOIO-'SYS  • C NMOD  *»•  0 THEN  MINP-NINPII  MOOST I R) 1 I I ' . • 
ELSE  MINP-MINPII  ROMP  SI R5 I II*  »* 

end:  /•  l*  •/ 

AM  IN- LENGTH  I MI NPI  i 
SU8STRI  MINP  ,NK  INtll— >* : 

PUT  FILE  ISYSPRINTI  EDIT  IMINF)  (SRIPCD.COLII).  ai: 

I NO  I /•  L 3 •/ 

FUT  FILE  ISTSPRINT  EDIT  I 'NUMBE*  OF  TERNS  IN  EQUAT ION : • . Y TER  Ml 
I SR  I PI  2)  ,C0L(2t.A,F|4.OI): 

PUT  FILE  ISrSPRINTI  SRIPI2I: 

CHARI-*  •:  /•  DETERMINATION  of  CWWNtHJ  SYMBOL  S FOR  OUTPUT 

CHAA  2-CO: 

Char  l -Char  i heo id; 

CMAR2-CHARZ  II  ' - • : 

L7tOO  R6-1  to  nterm; 

IF  COEF  (R*  I > 0 THEN  SIGN-4  ♦ •: 

ELSE  SIGN  - 4 - • I 
IF  R*  - I THEN  GO  TC  AC; 

CHAR2-CHAR2 IISIGn: 

CHari -Chari  u<  • j 


0000*350 
0000*3*0 
00006)70 
| 00006380 
00006390 
00006400 
00006410 
00006420 
00006430 
00006440 
00006450 
000064*0 
00006470 
0000*480 
0000*490 
00006500 
00006510 
00006520 
00006530 
00006540 
00006550 
0000*560 
00006570 
00006580 
00006590 
0000*600 
00006610 
00006620 
000066)0 
; 00006440 

J 00006650 
00006660 
00006670 
00006680 
00006690 
00006700 
* 00006710 
00006720 
00006730 
•/  00006740 
0000*750 
00006760 
00006770 
00006780 
00006790 
00006100 
000068  10 
00006820 
0000*830 
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FL/I  OFTIMlIfNC  COPFILM 


SPARCS2:  PROC  OPTIONS  IMIHII 


: DO  (T  • 1 TO  NCONJ 

IF  JU8ST* IT £RNS (*6 » .R7. 1 1 “ *0‘*  ThE  *i  W3  TO  150: 

IT  EOIO»*ST$  • C VCD  ' - O THEN  DO; 

char  t*CM«  1 1 I**oost(  km 1 1 • •: 

IE  Nfc» LE  nCIh irqnps la  T l >: 

CNO : 

asE  oo: 

chari-chari  lUOHPSt  rrj  ll«  •: 

LE  Nfc-  Lt  NOTH  I KDHP  SI  a7l  l : 

WO: 

IT  LEH6-1  THEN  CHAR2-CMAR2IIC1: 

ELSE  IF  LEN6-2  THEN  CHAR2-CHAR2I  I C2: 

El SE  CHAR2-CHAP21  IC3: 

lEM*UNCTHloa«il; 

IF  K N>  112  C IE  N 020  THEN  DO; 

IT  |C7  — ICON  THEN  04AA2-CWAR2I  I ♦•*  : 

pyjX  FILE  ISYSP«INT|  EOIT  CCMAR2I  I S«  (F I 2 I . COL  O I.  A > I 
PUT  FILE  (SYSPAINT*  EOIT  ICHAA1I  ICOl(*).AI: 

LEN-o : 

CHARI-**; 

CHAR  2- * * 1 
ENO: 

ELSE  oo: 

CO  TO  L 50 1 

END: 

0:W0:  f AC  •/ 

no:  /•  1 7 •/ 

FUT  FILE  ISYSPRIWT)  EOIT  (CHAR  2 I ( SR  IP  12  1 . COL  (31 . A)  ; 
PUT  FILE  (StSFRINTI  EOIT  (CHARtl  ICOL(*»,All 
RETURN: 

CMOS 


E:  FROC  ( REL  . C Cf  F , NCON , NT  € »R.  T E *NS.  ST  SR  a l: 

FROCEOuRE  CONFUTE  CALCULATES  VALUES  OF  THE  RELIABILITY  OF 
M SYSTEN  BY  USINC  THE  PROBABILITY  EQUATION  GENERATED  BY  THE 
CECURE  E0C6N. 


SYSTEN  RELIABILITY. 


CCL  ( NCCH.NTER"  .RA  . RR 

DC L I SYSREL.RtHM 

CCL  (BftOO.OREL  .OSYSREL 

OCL  TERpS  l • 1 BIT  I • I VAR: 

DC  L COE  F (•»  FlJtEO  UNI  4 

CSYSREL-O.l 

DO  RA  - 1 TC  NT  I AN; 

•poo-  l.o: 


I FIRED  BIN 
I FLOAT  DEC 
I FLOAT  OEC 


0000*«*0 
00006BSO 
000068  AO 
00006870 
00006880 
00006890 
00006900 
00006910 
00006920 
00006950 
0000 69 AO 
00006950 
00006960 
00006970 
00006980 
00006990 
00007000 
00007010 
00007020 
00007050 
000070*0 
00007050 
00007060 
00007070 
00007080 
00007090 
00007100 
00007110 
00007120 
00007130 
000071*0 
•/00007150 
•/00007160 
00007170 
• •• • /OOOO  7180 
•/00007190 
6/00007200 
6/09007210 
6/00007220 
6/00007230 
— • 6/0000  7 2*0 
1131 100007250 
16  I : 00007260 
(161 100037270 
00007280 
00007290 
00007300 
00007310 
00007320 


PL/ 1 OPTIMIZING  COFPILEA 


SPARCS2I  FROC  OFT  IONS  (HA  INI  I 


CO  II  • I TC  NC0N1 

IF  SUBSIRI  TERNS!  RAI  .R8.  II  — 

CAEl-RELIRB  1: 

MOO-CRCO»OREL: 

FIN.  WO; 

CSYSREL -OSYSREL  *BROD-COeF  I RAI 
ENO: 

rrSAEL-OSYSAEl ; 

ENO  CCHPUTE: 


- *1*8  THEN  CO  TO  fin: 


( fort. f ail. NCON. type .REL .ATTFE I | 


/6  IMIS  FUNCTION  FROCEOURE  OBTAINS  VAlUfS  C*  COnPONEN* 
f RELIABILITY  BY  C AL  L t NO  THE  BETAICABTAI  OR  GANN A C R&A 6 A I 
/»  IANOOM  VARIATES  GtNERATCA  COAMSPO’CI  NG  TO  EACH 
/•  CHARACTER  OF  COMPONENT. 


f VARIABLES:  FAIL  - NU"8ER  OF  ACCONULATEO  FAILURES 

/•  |V  - I NO  I C A T OR  FOR  NT  8 F CONFUTATION 

f NCON  - NUNSER  OF  COMPONENTS  IN  A SYSTEN 

/•  RE  L ( *1  - VALUE  OF  COHPCNENT  RELIABILITY 

/«  TYRE  - OlFOR  TINE— TO -FAIL  UP  E CONPONENT 

/•  1 : FOR  SUCCESS-FAILURE  CONPONENT 

f FORT  - HO.  OF  SUCCESSES  FOR  TYPE  1 

/•  NO.  OF  TESTUNlTS  FOR  TYPE  0 

/•  REQUIRED  FUNCTION  PROCEDURES  - CAttT  A.  RG ANA 

.................t....  .»••••••••••••  ••• 

OCL  (REL (• I .FORT ( 6|  ,F*  ILI*  I. AA. 8. TENF  I FLOAT  OEC 

OCL  (NCON. 10  » FIXEO  BIN 

OCL  TYPE ( • I BIT  |6|.«rYFE  CHAt(6|: 

OO  10- L ID  NCOP: 

IF  TYPE  ( 1 0 1 - *1*8  THE  6 GO  TO  BTVR; 

ELSE  IF  TYPE!  101  - *0*8  THEN  GO  TO  G NvR : 
PUT  FILE  ( SY SPRINT  I LIST  ( • T Y PE . PORT . F A IL  DESIGNATED  IN  ERROR 
STOP; 

BTVRiAA-POATI  101  * 1.:  /•  SUCCESS-FA1LI*E  CONPONENT  RELIABILITY 

• - F A I L ( I Dl  » l.: 

REL  II  01  - CABT  Al  AA  .8  1; 

IF  ATYPE  “ 'U*  Then  RELIIDI  • 1.  - RELIIOU 
GO  TO  N XTT  ; 

tNVR: AA- FA  ll I ID  I * l.t  /•  Tl N£ - T 0-F A I L UR  E CONPONENT  RELIABILITY 
B - V./<  PO«T| 101*1.1: 

TE  N P - RGANAIAAI  • 8 I 
RELIIDI  - f*P  I-TEnpi: 

IF  ATYPE  - *U*  THEN  RCLIIOl  - 1.  - RELIIOI: 
n * T T : f to  : 

eno  oatacen: 


00001330 
0000X3*0 
00007350 
00007360 
00007370 
0000 7383 
00007390 
00007*00 
00007*10 
6/00007*20 
6/00007*30 
00007**0 

— ••/00007*50 

6/00007*60 

6/00007*70 

6/00007*80 

•/00037*90 

• /OOOO  7300 
6/00007510 
•/00007520 
6/000075  JO 
6/000075*0 
6 /OOOO  7550 
6/00007560 
6/0 0007570 
• /OOOO  75  60 
•/00007590 

— •6/00307600 
161:  00007610 
(15  1 :0000  7620 

00007630 
000076*0 
00007650 
00007660 
• I : 00007670 

OOOO  7680 

• /OOOO  7690 

00007700 
00007710 
00007720 
00007730 
•/000077*0 
00007730 
OOOO  7760 
00007770 
00007780 
00007790 
00037800 
•/00007B10 
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n/i  optimizing  compiler 


SP**CS2>  PROC  OPTIONS  (MAIN); 


net  u 


/• 

CA8T4:PPOC< A. ft)  RETURNS  (FLOAT  0ECI4I); 

'/«*»'** •••••■••••••.I................ 

0E,“,Ei  «»•  E"E  «E'«  OISIHHUTIOH  WITH 
t*  PAAAMt  TEAS  EO'JAL  TO  A AND  I RESPECTIVELY. 
f THE  MOUdUTY  DENSITY  IS  PROPORTIONAL  TO 
**  X— IA-11  • ( 1-XI  •*(8-  l)  . 

/»  the  values  op  a and  b must  each  be  -ce.  i.o  - 

'Z  OP  A.  OA  i.  « BOTH  ■ ARE  . E 0.  1.0  THEM  THE  MET  HOO 

/*  USED  IS  DIRECT  MAPPING  OP  UNIFORM  P SE  UOO-  A A <OQ  M NUMBERS  USING 
f*  THE  INVERSE  CJP  THE  CUMULATIVE  DISTRIBUTION  KTNCMON. 

/•  THE  METHOD  USED  If  The  VALUES  Of  A AND  a are  BOTn  .GT.  i.o  IS 
'*  F*C/<  * OENSITV  TRUNCATED  TO  BE  NONZERO  ONLY  IN 

/»  THE  INTERVAL  (0.1).  PAR*  AMD  PARC  ARC  SAFETY  FACTORS  ON  THE 

/•  HEIGHT  AND  CURV  A TIME  Of  THE  CAUCHY  OENSITY  AT  THE  NQOE. 

/*  4.  P.  CHANDLER  A HO  K. 


/• 


LEE.  ORLAHOMA  STATE  JNIVERSITV 


19T7 


400 

401 

402 

403 

404 

405 
404 
40  T 
4CB 
404 
410 


411 

412 

413 


414 

413 

414 
41? 
4 1 B 
413 

420 

421 

422 

423 




DCL  PARH  FLOAT  DEC (4)  INITI1.H; 

DCL  PARC  Ft  OAT  OEC(b)  INITtl.lIj 
OCL  PI  FLOAT  3ECI5 ) IN  MO. 141 39 1 : 

OCL  aisav  float  oeciai  Initi-i.i: 

CXL  B1SAV  FLOAT  DEC!  A ) lN!T(-l.); 

OCL  Z FIXED  B!  M3 1 I INITIO); 

nrV  ! lit  *i »*!**. *■.*  ’*Lr*  .XNOOEC.CL.A.  B.U.T.CCL  I FLOAT  OECI 

> FLOAT  OECI 41 


OCL  ( FBL.OT.BJ.BL 
•f  * ■ I.  ( I •!.  THE  A RETURN  IRANFIZU; 


B1-B-I-: 


CHECK  FOR  ILLEGAL  VALUES  OF  A AMO  6. 


IF  tl  < O.  | II  < 0.  THEN  CO  TO  L2; 

IF  01*0.  THEN  *E  TLPN  I RANF  I Z I •• ( t . / A I | ; 

ELSE  IF  Al-O.  THEN  RETURN! l.-RAMFIZl  — ( 1 


/in: 


TEST  TO  SEE  IF  ME  *AJST  RECOMPUTE  THE 
VALUES  OF  CONSTANTS. 

•I  M-4ISAV  l Bi  “AISAV  THEN  CO  TO  Lis 
A1SAV-A1; 

BIS  AV-B1  ; 

KMO0C*Al/IAl»«llt 
X30CEC-1.-  XHOOE: 

ALCASTmALGAMAI  A.BI-ALCAMAIAI-ALGAMAIB); 

ALP A- PARC* SORT  (2 . • X MOD E* A MQO EC/ (ALAI  J| ; 

it:  .L,“;  'I  sr<  ;•  ‘iC" ' 1 • 

8U-ATANI  XMCOEC/ALPAlt 

NOM  use  REJECTION  FRQm  the  CAUCHY  OIST. 


•/OOOO 7820 
00007830 
— /00007840 
•/00007830 
•/O 0007860 
•/OO0O7A7O 
*/0000 7 ABO 
•/OOOO 7B90 
•/00007900 
•/00007910 
•/00007920 
•/00007930 
•/OOO 07940 
•/00007950 
•/00007940 
• /00007970 
P/00007910 
•/00007990 
••/OOOOBOOO 
00001010 
00006020 
00008030 
00008040 
00008030 
00008040 
4 ) 100001070 
: 00008080 

00008090 
OOODB 100 
00008110 
•/00008I20 
•/00008130 
00008140 
00008 1 30 
0000  B 1 AO 
“/00008 170 
m/OOOOB  IBO 
m/00001190 
00008200 
00008210 
00008220 
00008230 
0000B240 
OOOD8230 
00008240 
00008270 
00008280 
00008290 
•/OOOOB3QO 


PL/I  OPTIMIZING  COMPILER 


SPAACS2  * PROC  OPTIONS  INAlNIt 


PAGE  I* 


3 TNT 


424 

423 

424 
42? 

428 

429 

430 

431 

432 

433 

434 

433 

434 


43? 


439 

440 


441 

443 

444 

443 

444 
44? 
448 

443 

430 

431 

432 

433 

434 
433 


454 

43? 

438 


lddtmiani  bl.ibo-bl  i*aanfizi  i «al pa  : 

T-IMOOE.OT; 

IF  I <•  0.  I I >•  l.  T*N  GQ  TO  LIS 
CCLCLP  LOGIALPA/  I Alpa»m  2»0T  ••21/PII; 

FBL«ALCNST«A|m  LOG  I T| ♦ 81*  LOG(l.-T); 

IF  POL  > GCL  TK»  CO  TO  L2l 
LI1  :U»AANF  I Zl  S 

IF  u <-  0-  THEN  GO  TO  Lll: 

IF  CCL*LOGIU)  > FBL  THEN  GO  TO  Lll 
•E TUAN!  Tj  s 

12) PUT  FILEISYSPRINT)  LIST  (•  ERROR  IN  SUBROUTINE  CABTa 
XMOOE. ALCNST.ALPA.CL.T.GCL.FBLIS 

STOPS 
EN  0 J 


ALCANA l PROC  I XXI  RETURNS  (FLOAT  DEC  I 4) t ; 


OCL  122. TERM  .RZ2I 
IXX.OLNGI 
22  -xx  : 

IF  XX  (■  1.E10 

THEN  IF  XX  <-  I . E— 09  /•  XX  IS  MtAR  0 OR  NEGATIVE 

THEN  DO  I /•  SET  ERROR  INDICATOR 

ERROR- *2’  » PUT  FILEISYSPRINT)  OA TA  (ERROR)  SRIPI2IS 
DLNG  --1 .E73  S 
GQ  TO  S20  j 
END  : 

EL  SE  00  I /«  XX  > 0 ANO  < OR  - TO  l.E.10  •, 

TERN  -l.CO  l 

>0)  IF  Z2  <*  18. ED 

THEN  00  S 

TERN  -TfRM-22  ; 

22  -22*1. EO  ; 

GO  TO  sio  ; 

€ NO  | 

ELSE  00  : 

A 22  -l.CO/ZZ— 2 S 

OLNG  «(2Z-D.5ED)-LOGIZ2t-72* 0.9 l»9385 33204672 EO 
-LOCI T EAMI.lt  .EO/ 2 21-1  .8)13333)3)  13 33 3E  - 01 
-IAZ2-(.27T77T7T77TT777E-02*(*22* 

I .79365079343079  )E-D>-  1RZ2- 
1.3952380952  3S095E-O3 I )) I ) > ) 1 
GO  TO  S20  S 
ENO  > 

E NO  t 


/•  CALC.  EQUATION 


00008310 

00008320 

00008330 

00008)40 

00008330 

00008340 

00008370 

00008380 

00008390 

00008400 

00008410 

00008420 

00008430 

00008440 

•/00008430 

•/00008460 

00008470 

• /O  000  84  80 
- /O  000  84  9 0 

• /OOOO  8500 
•/000085IO 

30008520 
00008330 
00008540 
00008530 
•/00008560 
•/00008570 
00008380 
00008390 
00008600 
00008610 
'/00008420 
00008630 
•/00008640 
•/00008650 
00008660 
00008670 
00008680 
00038690 
• /OOOO 8700 
000087 10 
00008720 
00008730 
00008740 
00003730 
00008760 
00008770 
00008780 
00008790 
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fl/i  optimizing  cowiiii 


SPARC122  FROC  O’ HON*  IX*  I >»l; 


nti  20 


454  fill  If  XX  < 1.170  THE  N 00}  /•  XX  > 1.1*10  *NO  < 1.2*70 

440  IX  NC  • 22*11  OCI ZZ1-1.E01  }/•  CH.C.  EOUIUON  2 

441  CO  TO  120  ; 

442  END  I 

44 1 RSE  DO  : /•  XX  > 04  - l.£*70 

444  fRROR-'l*  J FUT  FILE IlYSFRlNt)  0*T  A 4 ERROR 1 SKIFI2I} 

444  OLNC  ■ 1 .£  7 5 » 

447  END  } 

44«  S20f • E T IF  N I DC  NCI  • ENOs 


470  RCAMAt  FROC  1*1  RETlFNI  (FlCAT  DE  C I * II  ; 


/•  COOED  IN  Fl/t  4T  X.  x.  LIE. 

/• 


/•■••.MO 


471  OCL  S HO*!  01  Cl  4 1 lull  1-1.1} 

472  OCL  O FIXED  81*1311  INITIOl: 

47  J OCL  IA.CL.S.4Q0TH  .CS. X.l.U.f .CO.T.CC .C*H*.20  . I FLOAT  DEC! 41 

474  Cl-l.*R-I.S 

479  IF  CL  <*  0.  THEN  STOF;  /•  TEST  FOX  INVALID  VALUE  OF  -4-. 

/*  HAS  THE  VALUE  OF  - A-  CHANCED  SINCE  IK 

/«  F«EV10U1  CALL  TO  X CAM  A . 

474  IF  A - • THEN  CO  TO  ONlx 

477  4*41  /•  RECOMPUTE  VARIOUS  CONSTANTS. 

471  S- I ./O.  "SORT!  41 1 | 

474  ROOTM-SORT 13.1  } 

440  20- l.-ROOTM-  Si 

441  CC«**ZO»«l-lS~ROOTHl*»Z/2.t 

442  CS-1.-S»»2S 

443  ONElX-CAUSFIOI  } /•  CAUSE  RETURNS  A NOINALIO.il  RANDOM  DEV  t AT  E 

444  2*  S *X  *CS  1 

419  IF  2 <•  0.  THEN  CO  TO  CM » 

44*  CAN A-A*2  **J  i 

447  9 I X l U*  R AN  F 1 0 I I 

444  IF  L <•  0.  THE  R CO  TO  SIX: 

444  E - “ LOC 10! I /•  GENERATE  (,  AN  EXFONENTIAL  RANOOM  OEVIAT 

440  C0« f*X *"2/ 2.-  CANA*CC: 

441  T-1.-20/2! 

442  IF  CD*CL»T*I1.*T*I  l./2.*T/J.ll  > 0.  THEN  CO  TO  EGTl 

443  IF  CO«Cl*  LOCI  2/201  < 0.  THEN  CO  TO  ONE: 

444  ECTlRETLRNI  CAHAI ; 

44  9 END: 


/• 

/• 

CAUSF IFROC  I NOCF<  V | RETURNS  IFLOAT  0ECI41IS 


•/ooooaaoo 

•/OOOOBBIO 
00008620 
00006130 
•/00008840 
00008890 
00008860 
0000  8870 
00008880 
•/00008890 
•/00008900 
0000B9 10 
• /00008920 
• /O  000  89  30 
■/00008940 
• /00008950 
•/00006960 
•/00008970 
• /O  000698  0 
00006990 
00009000 
00009010 
00009020 
•/00009010 
•/00009040 
•/00009050 
00009060 
•/00009070 
00009080 
00009090 
00009100 
00009110 
00009120 
•/00009  1 30 
00009140 
00009190 
00009160 
00009170 
00009180 
fa/00009190 
00009200 
00009210 
00009220 
00009230 
00009240 
00009290 
•/00009240 
•/O 0009270 
00004280 


FL/I  OFT  IN  111  NC  C0*4»ILER 
STMT 


SFARCS2X  FROC  OFT  I CMS  (MAINIl 


/•CENTRA 
/•OISTR  I 
/•C.  MAR 
/•FOR  4 
/•EQUAL 


/• 


Ti  S RANDOM  NUAMAL  DEVIATES...  RANDOM  NU«8ER1  FROM  A CAUSS 
euTION  ■ ITH  ZERO  MEAN  ANO  UNIT  VARIANCE. 

SACLIA  * NO  T.  A.  M»Y.  S.t.A.M.  AEV1E-  6 119641  260. 
RANDOM  NUN 6 E R FROM  t«E  CAU1SIAN  DISTRIBUTION  MltM  MEAN  VAl 
TO  ’AREAS'  AND  S T AN  3*A0  DEVIATION  EQUAL  TO  'SIGMA*.  USE... 

rnC-ame  an.  si  cm  a*  cau  IF  (Dummy  ) 

0 1 U 


447 

444 

444 

900 

901 

902 

903 

904 

909 
90* 

9C7 

904 

904 

910 

911 

912 
911 

914 

915 
914 
517 
514 
514 
520 

921 

922 
921 
924 
929 
524 
527 
924 
524 

910 

911 

912 


C MR  F4  0FTIMI24TI0N 


1 20 1 


OCL  NARC  FIXED  oINULI  INITiOM 
OCL  NARCA  FIXED  6INCJ1I  INITIOII 
OCL  NDUMV  FIXED  BINtllf; 

OCL  IA.A6X.  EX  .FAC  .C.CAUS  . SUMS  0 • V A , V 6 . X 
OCL  IRJUMP.4 

C a u 1 - 0.; 

NAR  CA.NARC S 
RJUMF-RANF (NARCI } 

IF  RJUNF  < .1362  THEN  CO  TO  120: 

A-IXJIWP-.  13621/. 8634} 

DEFEAT  THE  IDIOT! 

4 .R ANF I NARCI : 

THF«A*B*RANF  (NARCA  I -t.  5l 
CAUl-TMP  *2 
CO  TO  L 1 50 : 

IF  R JUMP  < .0255  Then  CO  70  L40: 

A- I FJUMF— .0255 1/ . 1107; 

CAUS— I.  5*1  A*R»  *4  I NARC I -l. I : 

CO  10  L 150: 

L40:  IF  RJUMF  < .00264979*  1 THEN  CO  TO  L 1 10 1 

■» * .•* anf i nar;  i-3.  : 

T-  . 154«R  ANFlNARCA  I ; 

EX-17. 4973U9fc»£XPl-.5*X»*2|  I 
ABX-AB  SI  XI  S 

IF  ASX  > 1.  THEN  CO  TO  L70; 

C-E  A—  4 . 735  7032  *• 13. -X«»2  1-2.  I 9 747544 • II .5-ABK I ; 
CO  TO  L90: 

L70  iC-E X-2. 3*785 1*3»I3--*8XI»*2: 

IF  48  X > 1.5  THEN  CO  rc  L90: 

C-C-7.15  7IT5***I  1.5-AB  *1  I 
L40l  IF  T > C THEN  CO  TO  1150: 

CauS-x; 

CO  TO  L 1 50  : 

L!10:VA-2.*"A>*  I n a R ci  — l . t 
Vtt  . ;.  »R  A NF  I NA  R CA  | - 1 . | 

Sumso-va**2*v6  *»2: 

IF  Sum 10  > 1.  Then  go  TO  Ltio; 


M.a/O  0009240 
1 AN*/00009  300 
•/00009310 
•/00009320 
Ut  • /00009  330 
. • /00009340 

•/00009350 

• /O  0004  3*0 
• /000093  70 

• /000093  80 
•/00004390 

••••/O 0009*00 
00004410 
00009420 
00009430 

i:  00009440 

It  00009*50 
000094*0 
00009470 
00009480 
00009490 
00009500 
• /000095 1 0 
00009520 
00009530 
00004540 
00009550 
000095*0 
00009570 
00009580 
00009590 
00004*00 
00009*10 
00009*20 
00009*30 
00009*40 
00009*50 
00009**0 
00009*70 
00009680 
00009*90 
00009700 
00009710 
00004720 
00004730 
00009740 
00009750 
000097*0 
00009770 
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pl/i  optimizing  compiler 


jr»«CIJi  MOC  OPTIONS  IMA  INI: 


PAM  22 


STMT 


3SS 

»4 

535 

S3* 

537 

sia 


53* 


5*0 

341 

542 

543 

544 

543 

544 
54  T 

544 

545 
330 
33K 
332 
533 
354 
335 
354 
357 
35« 
553 

340 

341 
542 
5*1 
544 


IP  SU"SO  <-  0.  THIN  CO  TO  LUO: 

FAC -SORT  1 13.-2 .4  LCGt SIN  SO  I I /SUMS  01  l 

C4U$-v**P*C  ; 

IP  MS(CAUS)  < .3  Th£  H CO  TO  LlIOl 
LI30:(£TLRMICAuS>: 

EnO: 

/• 


INOFIX  EOOVERFLOw I i RAHF  : PROC  INARM  RETUImS  (FLOAT  DEC  1411: 


000097(0 
00009790 
00009(00 
00009(10 
00009(20 
00009(30 
•/00004840 
•/00009850 
•/00009B40 
00009(70 

•••*«••••«•••••••••••••• /oooo4»eo 

/•  THIS  FUNCTION  GENERATES  PStUOC-R ANDCM  NUMdE  R S , UNIFORMLY  •/00004890 

/•  O I STR  IBUTEO  CN  (0,11.  IMS  VERSION  IS  FOR  THE  I3M  J40.  4/00039900 

/•  METHOD COPPOSITE  OP  THREE  MULTIPLICATIVE  CONGRUENT  I At  GEM E R ATOR »/C00099 I 0 

/•  C.  MARSACLIA  ANO  T.  A.  BRAT.  CONN.  ACM  11  (19*81  757.  4/00009920 

IP  RASP  IS  CALLED  MlTH  NMG-O.  THE  NEXT  AAMOON  NU«9ER  IS  RE  TURNED.*  /O  0009930 


/•  IP  li»P  IS  CALLED  Him  N AAG--0  . THE  CENFRATOR  IS  RE- INIT  1 AL 1 ZED 
/•  USING  l ABS  I 2 •NAD  G»  U ANO  THE  FIRST  RANDOM  NLP'BER  FROM  THE  H-  W 
/*  SEQUENCE  IS  RETURNED. 


STATIC 
STATIC 
ST  AT  1C 


•/0OD09940 
•/000099  50 
•/00009940 

/•  p/00009970 

/•  COOED  IV  PL/ I BT  WILLIAM  SC3TT  DAVIS  FROM  A PORTRAN  VERSION  BY  4/00039980 
/*  J.  P.  CHANDLER.  COMPUTER  SCIENCE  DEPT.,  OKLAHOMA  STATE  JM I VE RS I TY . • /00009990 
/•  •/OOOIODOO 

/OOOIOOIO 
00010020 
00010030 
0001 0040 
00010050 
00010040 
00010070 
00010080 
0001 0090 

FIXED  8 INI  311  ST  AT TC ;00010100 
1 PLOAT  OEC (41  STATIC:  000 10 1 10 
REINITIALIZE  USING  NARC.  4/00010120 
00010130 
00010140 
00010150 
00010140 
00010170 
0001 01 RO 
•/O 0010190 
00010200 
00010210 
•/00010220 
00010230 
00  01  02  4 0 
00010250 

CCHPUTI  THE  NEXT  RAfOOM  NO.  4/00010240 


DC L X PlXEO  81  NAAv  1311 
CCL  L FIXED  binary!  311 
DC  L M f IXEO  BINARY  I 31  I 
OCL  MX  FIXED  8 1 NARY  13  1 1 
CCL  ML  FIXED  BINARVI3II 
CCL  MM  FIXED  BINARY  1311 
DC  L NARC  FIXED  BIN!  311; 

CCL  NPIRST  81 T I II  STATIC  INITIAL 
□CL  I J.RLM.NI12R1 ,NOIV. NR 

□Cl  ( ran.ro iv 
IF  NARG  — 0 THEN  03: 

KLM  - A RSI  2 • NARC  • m 

X.L.M  ■ XL  M { 

no: 

ELSE  DO: 

IP  - NPIRST  THEN  CO  TO  SAP: 

END: 

NPIRST  • • o*B; 

NT  I V - 14777214: 

POIV  - 32  74 R. 0 • 45534.0: 

OO  J - 1 TO  12  Rt 

X - A • NT.  ; 

Nlil  • Xi 
Emo: 

t • L • ML : 


76541211  static: 
76543211  STATIC: 
76543211  STATIC* 
I N|T | AL (282429  I J 
t N| Tl AL I 368211  : 
INITIAL  (45541  |; 

I * i*Bi  : 


INITIALISE  the  ROUTINE. 


PILL  THE  TABLE. 


PL/I  OPTIMIZING  COMPILER 


SPAXCS2 * PROC  OPTICWS  IMA (Nil 


PACE  23 


STMT 


545 

344 

34  7 

54  a 

549 

5T0 

371 

512 


373 


374 
575 
3T4 
57  7 
57R 
573 
3BQ 
3R1 
SR2 
3(3 
54  4 
583 
5R4 
3R7 
5RR 
5(9 


530 


531 

592 

393 

534 


l 


AMS  ID  / NO  IV; 


XX  > A8SINI.il  ♦ L ♦ Ml: 

ran  * float i nr i / RCIv; 

X - x 4 MX : /•  REFILL  THE 

RIJ1  • «; 

■CTuRM  rani  i 
0*0  R AN  P : 


-TH  PLACE  IN  THE  TARLI 


SORT  x PRO  C IN. XI: 


00010270 
0001 02(0 
00010290 
00010300 
4/00010310 
00010320 
00010330 
00010340 
4/0001  0350 
4/0001 0340 
00010370 
•4/0001 0380 
4/00010390 
4/00010400 
4/00010410 
4/00010420 
•/00010430 
•/00010440 
4/00010450 


OCL  IN.M.I  ,J 
OCL  I X I • I « Y 
IF  6<2  THEN  RETURN: 

M - N; 

One *n  - m/2: 

00  J-l  TO  N-N; 

Y - XI J*M1 ; 

OO  l*J  IT  4 TO  1: 

IP  RtlKY  THEN  CO  TO  Two: 
xi l *n I • xiii: 

End; 

T wO  X X I I *N1  - Y; 

EMO  : 

IP  »>1  THEN  CO  TO  0*«  : 

RE  TU»n: 

EMO  : /•  SHELL  SORT  •/ 


STATl  PR3C  ISN. SV.AVSN.ATYPE. TIME. UNI  T. TOT. T0T2.STMCR1: 


•• ••••••• •••••• 4/0 00 10460 

I FIXED  BINt 1 5 1 ;0 0010470 
I FLOAT  OEC (6  I : 00010480 
00010490 
00010500 
00010510 
00010520 
00010330 
0001054D 
00010350 
00010560 
0001 0570 
00010580 
00010590 
00010400 
00010610 
00010620 
4/0001 0*30 
4/Q0010640 
00010650 


»••••••/()  joi  0*60 

/*  PROC  E OLP*  E STAT  CCmPuTES  The  ESTIMATED  SYSTEM  MI  BF.  SYSTEM  */OOOlO*TO 

/•  RELIABILITY  ANO  MTBF  PE ACEH  flLE  POINTS  USING  A SET  OF  SYSTEM  4/00010*80 
/*  RELIABILITIES  CENERATEO  8Y  MQNTE  CARLO  PROCEDURE.  4/00010*93 

/•••••••  .............  ....... ../0 00  to  700 

OCL  PCTilll  FLOAT  OEC I *1  INIT  (.05.. 1. .2. .25. .5, .75. .8.. 9. .95  . .97500010713 
..991  STATIC. IVALI  111. MTBFI11I.SVI4I.  AVSN.MTBAl  FLOAT  DECI8I;  00010720 
OCL  ll.SN.lv  I F I x ( 0 SINUS  1 -,00010730 

OCL  ITJME.FVAL .CVA.SZ«.FL0C.T0T.T0T2.SD.VAA,PA  » FLOAT  0ECI6I:  00010740 
OCL  UNIT  CHAA |41 .ATYPE 1 CHARIL3 I, AtYPE  CHARI •!, STMCR  FLOAT  0£ Cl  61 :0001 0750 


43 


pl/i  optinizing  co***  iler 


SP  ARCS2*  »»OC  0*11  Xi  IMAINIt 


n«  » 


595 
55* 
*00 
*01 
*03 
*04 
*05 
*C* 
*0  7 
*0* 


*05 

*10 

*11 

019 


*13 

*14 

*15 


*17 
*1* 
* 15 
*2  0 
*21 
*22 
*21 
*24 
*25 
*2* 
*27 
*2* 
*25 
*30 


00  1*1  TO  id  mill-8.:  510*111-0.1  fnoa 

RTVPEl  - • REl J ABU ITY-  I 
I*  SN  -1  THE**  00; 

WAR  - 0.  I 50-0. S 
E NO  i 

El  SE  03: 

VAR  -I  TOT  2-  TOT  -TOT/SNI/  1SN-  II  j 
SO  - SOM  t VA*  1 * 

End  i 

PUT  F IL  El  SYS*  * INT  I COtT  (•  AVERAGE  SVSTCH  RELIABILITY  FROM  '. 
Sl"NUN.»  NCNTE  CARLO  TRIALS  IS  • • AVS4  ■ • J AVERAGE  SYSTEM 
•ONRCL IARI LTY  IS  • .l.-AVSMI 
I SRI *1 51. A. FI  31 .A. *1 *.*I.A. A.Ft •.*>  I 
|-  VARIANCE 

,*  • * VAR  1 ISKIPC 21.A.A.FI R.6) I I-  STANOARO  DEVIATION 
••  '.SOI  ISR 1*1 21 . A. A.F( R.4I I * 

17  TIME  — 0 THEN 
00:NTt*HCA--T  IHE/LOGI  S TNC  R!  J 
NT  6 A»-T I HE /LOG  I AVSN I : 

RUT  FILE! STS**  Inti  EDIT  I • THE  NT SS I ON  TINE  IS  '.TINE. UNIT) 

(SRlR(5I.COLI*».A.7t«.3I.XI2I.AI  1 * IN  6 ESTIMATED  SYSTEM  M 
.'IAS  to  UPON  MEAN  CCMPCNENT  REL  1 AO  IL  IT  IES  IS  • , " T OF  NCR  I 
I SAIRI 2) .COLIbl .A . A,E I 15.01 1 I* THE  ESTIMATED  SYSTEM  Hr  0 * ' 
'RASED  UPON  MEAN  SYSTEM  RELIABILITY  '.SIMNUM.'  monte  CARL 
•TRIALS  IS  '.NT*A>  IS< t*<2 I.COL (4 >. A, A.EI31 .A,  A. El  15.01) 
IATV7E  1. 'MTBE  • I (SRtRIll. 

COL  124  1.  A.  COL  149).  At  ( • PERCENT  II  E • , •*  ERC  E NT  I LE  • ,'PfRCeNTl 
I COL  141. A. COL  12  51. A. COL  14* I .A)  I' POINTS' > 'POINTS'I  IC3LI2 
A.COLI 40). A): 

(NO: 

ELSE  DO: 

RUT  PILE  I STS  RR INT)  EOIT  I 'RERCE NT1 LE ' . 'PERCENT  ILE ' I I SKI 
COl  (5I.A.C0LI25I, A)  {'POINTS'!  (COLI)ll.AI) 

ENO  t 


*.  51 


DO  1-1  TO  11: 

VAL II l-SN-RCTI  I I 
IV-71XE0IVALI 1 III 
E YAl-FLOAT  II VI  J 
IF  FVAL  — VALID  THEN 

VAL  II  l-V  AL  I I i-fval: 

IP  IV-0  THEN  DC: 
SIR-SVI1I-2.-SVI2I: 
cva-svi2  i-svi  1 1; 

VAL  II  l-CVA- VALID  I 
VAL  III-S2R -VALID; 

(NO : 

(LSE  001 

IP  IT- S M they  00; 


00010T40 
000107)0 
0001 07R0 
000 1 0740 
00010000 
000 10( 10 
00010020 
00010010 
00010040 
00010050 
0001 0040 
00010070 
00010000 
0001 0190 
00010500 
00010510 
00010920 
00010530 
00010540 
00010930 
00010960 
0001 0970 
00010900 
000 1 0990 
0001 1000 
00011010 
0001 1020 
0001 1030 
0001 1040 
00011050 
0001 1060 
PI  3 I aOOOl 1070 
0001 1000 
0001  1090 
•/OOD1 1100 
00011110 
00011120 
OOO! 1130 
00011140 
00011150 
00011160 
00011170 
0001 1100 
OOOl 1190 
0001 1200 
00011210 
00011220 
0001 1230 
00011240 


PL/I  OPTIMIZING  COMPILER 


SPARC  52  > PROC  OPTIONS  (MAIN)  I 


PACE  29 


SINT 


*31  CVA-SVt IVI-SVI  IV-lIX 

*32  (NO! 

*33  ELS*  DO  : 

*34  CVA -SVI I V-l )-S VI IV) : 

*35  ENO 1 

*3*  VAL  IM-CVA-VAL  I I I : 

*37  VAL  ID-SVI  IVI-VALI  ID 

*3*  END  I 

*39  (NO: 

*4C  ELSE  00: 

*41  VAL 11 l-SVI IV) ; 

*42  ENO I 

*4  3 IP  TIME  — 0.  THEN  DO: 

*44  MTRFI  I I--TIME/LOGI VALI  II  I: 

*45  PUT  PILEISTSPRINT I EDIT  |PCT ( I I • 100 . . 'PER CE YT VAL I I ) . N TBF  I D . 

1M  IT||  SAIPI2l.COLIll.FI7.il  .COL  It  01  .A. COL  I24I.FI  •.*).!  19  I. 
(IL5.AI.EI  21. AD 

*4*  eno: 

*47  (LSE  OOJ 

44*  PUT  FILE  ( SYS*  R INT I EOIT  ( PC T 1 1 I • 100. . * PERCENT' .VALI  I ) I 

ICOLI2I .P 47.1 1 .A.COLI 101 .FIR. 4) It 
*49  (YO : 

*50  EX  10: ENO  : 

*51  (NO:  /•  STAT  •/ 

/• 

/•  ENO  V ALL  PROCEDURES 

/• 

*52  PINIRi 

(no; 


00011250 
000112*0 
0001 1270 
0001 12*0 
00011290 
00011300 
0001 1310 
00011320 
00011330 
00011340 
00011350 
00011340 
0001 1370 
00011300 
0001 1390 
00011400 
00011410 
00011420 
00011430 
0001 1440 
00011450 
00011460 
00011470 
000 l 1400 
•/OOOl 1490 
•-/OOOl 1500 
•/OOOl 1510 
OOOl 1520 
00011530 
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